Published Monthly by Computer Publishing Inc., Hixson, TN. 



#1.05 



0£»$ fH©NuI$ 




Bulk Rate 

U.S. Postage 

PAID 

Chattanooga, TN 

Permit No. 357 



$©H! 



(Untor Mitxa ilnurnai 



TM 



The Color Computer Monthly Magazine 



$1.95 per issue Vol. 1, Issue 1 September, 1983 




The normal procedure Cor a new 
Magazine Is for the Editor to state 
the aims and objectives in the first 
editorial/ and I see no reason to 
deviate from that approach in this 
First Issue of Color Micro Journal. 
First, though, I want to answer the 
question we have heard most since the 
initial announcement ot the Color 
Hicro Journal; 

Wny AMOTHER Color Computer Magtjti 
As the saying goes, "that's a long 
story". 

■68 1 Micro Journal made it's debut in 
1979 as a Magazine for the Users of 
the Motorola 6800 CPU Chip, and has 
gained a devoted following worldwide. 
It became the "sounding board" for 
those users, and has been the major 
factor in the development of a 
consistency within tne SS-5B Bus and 
FLEX community that is the enwy of the 
"other guys". The 6809 Micro 
Processor made it's appearance a 
little later, and eventually showed up 
in a little "game machine" from Radio 
Shack called the TRS-80C Color 
Computer. It was "a natural" for 'fiS* 
Micro Journal to become the first 
magazine to provide coverage of the 
Color Computer, and it has continued 
to provide information tor the 
advanced users of the Color Computer 
every since. The SS-50 Bus Users saw 
the Color Computer as a way of 
introducing "new blood" into that 
market, and many of the '68* Micro 
Journal advertisers began producing 
products for the computer. 

Continued an p*g« 9 
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CHECKS /BAS 



requires 32K, Ext-BASIC 

CHECKS is an extremely "User Friendly" 
Color Computer Program that will 
eliminate the problems of making the 
Checkbook and Bank Statement agree. 
CHECKS is fully Menu Driven and is self 
explanatory; the Main Menu leads to a 
sub-Menu it required, and options are 
selected as required. A lot of error 
checking has been installed, and you 
have fiuiitec oue >ppoc tunitlea to go 
back to the Main Menu "cleanly" should 
you find that you are "not where you 
want to be". 

Basically, the Program operates just 
like you normally use your Checkbook 
and Bank Statement at the present 
time, and provides several "search" 
and "find" features that make it easy 
to separate out all of the Checks 
written for "Food", "Household Items", 
etc. The "Accounts" provided include 
FOOD, AUTO, HOME (IT) for household 
items, CLOTHES, HOME (EX) for home 
expenses, PET&ENT for Pet and 
Entertainment, MEDICAL, DEPOSIT, and a 
"YOU DEFINE" Account. A Data File is 
made up for the months Checks and 
Deposits and another one for the 
months Bank Statement when you enter 
the information from your Check Book 
or Bank statement. The System 
"Closes" a file when ALL Checks are 
accounted for for each month from the 
Bank Statements (this does not mean 
that you do not have access to the 
information, just that all checks for 
that month have been cancelled). 
Cancelled Checks are marked with a "C" 
(i.e.. Check #387 has not been 
cancelled, while Check I389C has 
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been)* Since I normally write a lot of 
checks each month, I normally enter 
the Checks and Deposits weekly so I 
won't have a lot to do when the 
Statement shows up. When it arrives, 
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Guarantee: We will ship your order for items in this ad within 48 working hours or you get 20% OFF! 
(Books/non-released items excluded. Gift certificate issued when shipped. Offer expires September 30,1983) 

MASTER CONTROL II 

from Soft Sector Marketing 

Tins is a BASIC language program designed 10 decrease 
typ»ng lime and error while providing direc* control of 
motor, trace, audio and run. With Automata Line Number- 
ing and a custom key you can re-use or change at any 
tame; plus 50 preprogrammed command keys. Can be 
used on a 32K system 

21340 16K/32KTapeJ3443 $21.21 
Now 15% off til Sept 30 

RAINBOW-WRITER 
SCREEN FORMATTER 

by ftointx/w ConnecWon SonVore 
The ultimate hi-res graphws text display- User definable 
224 character set, 1 2 sizes In a multitude o< colors *rtrt 
many screen features, including status/Help screen. 
Works in all PMODES — save characters, symbols, and 
animated figures to use in your own BASIC or ML pro- 
grams. Easily create dazzling displays — the possible 
uses are almost unlimited! 

33455 16K Extended Basic Tape $29.95 
32757 Disk $32.95 

COLOR 
COMPUTERS NEWS 

1981 BACK ISSUES 

This is the complete collection of articles appearing m ihe 
first 4 issues ol Color Computer News (May to December 
ot '81 > 17 different topics are covered plus continuing 
features like "ReMarks", Kids Page and New Products. 
43209 Softcover $9.95 
While they lest— quantities limited. 



PROTECTORS 

from Tom Mix Software 

Vou have 4 snips armed with laser cannon and smart 

bombs. They have waves ol enemy IVghlers; their mother 

ships have laser and heat-seeking mines. Get a new ship 

for each 5,000 points you score- Exciting arcade action 

with hi-res 4-eokx graphics. 

41331 32K Tape £34*5 $21.21 

Now 15% off til Sept 30 




FLIGHT 



by Dove Hooper 0/10" Mark Borne* from Prickly Pear 
Fantastic graphics oriented Hi- Res flight simulator has 2 
speeds, 4 difficulty levels, views from top and side, in- 
strument panel and realistic joystick control Don't crash 
or have to go around 1 " Can you land on the runway lo 
hear the synthesized voice say "perfect landing"? 
33556 32K Extended Basic $19.95 



COLOR 
CATERPILLAR 

from Soft Sector Marketing 

Ttus s the last-action arcade game you've been waiting 
to olay at home! You must hit mushrooms and caterpillars 
— segment by segment — moths and tumble bugs. The 
challenges: they are all moving; when hit they split into 
additional segments or metamorphose into different 
shapes; when yoo destroy a caterpillar, the new one that 
replaces rt is a segment longer than the original! 
36728 16KTap« S1&99 S 16.96 
Now 1 5% of til Sept 30 



MS 
GOBBLER 

from Spectral Assocroreu 
Use your joystick to guide Ms Gobbler through 4 mazes 
on a black background with moving shapes to gobble. 
Avoid ghosts of different cokxs and personalities Zip 
through the importation spot and use inviso-maze lo 
make the walls disappear. 

32500 32KTape $21.95 




VIKING 




WHIRLYBIRD 
RUN 




from Ptickty f»eoi 

Superb simulation game! Rise through Ihe ranits of a 
Viking kingdom, increase your economic power and rank 
until you win the game toy becoming ruler of H. 1 to 4 
players can complete it in 2 lo 4 hours. 

35109 16K 

Extended Tape S 19.95 



from Specfror AwocKWei 

Pilot a chopper over varying lerrwn while destroying 
enemy bases with bomOs and missiles. Destroy enemy 
fuel depots and win their fuel Hi'Res color graphics, 
machine language arcade game has three screens. Re- 
quires joysticks 

32511 16KTape $21.95 



FROGGER 




from ComSoff 

One ol the most popular arcade games ever now 
available for your Color Computer! Just as m the arcade 
game, you must dodge heavy traffic ana jump the moving 
logs in the stream to get home. Fantastic graphics. One 
or two ptayers, use keyboard or joystick. 

22947 IBKlspe $19.95 



DOLLARS 
AND SENSE 




from SpecrrofAMOCJOfes 

Smarten up! Wha1 s more important than teaming about 
money' Tins new educational game will teach your child 
about dollars and coins. Easily reinforces coin recognition 
and value Let the kids count the change! 

27751 16K Extended Basic Tape $1 1.95 
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Over 2500 Programs for TRS-80, ATARI 400/800, APPLE, IBM & VIC 20. 



Visit our other stores: 

829 Bethel fld„ Columbus. Ohio 

Seven Comers Center. Fells Church. MA 

W. Bell Plaza, 6600 Security Blvd., Baltimore, MD 

White Flint Mall, Rockville Pike, Rockville, MD 

Harvard Square, 13 Dunster St., Cambridge, MA 



Opening Soon in Tulsa and Oklahoma City 
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West rr ore land Mall, Rte. 30 East, Greensbufg, PA OPENINGS IN 

Plymouth Meeting Mall, 500 Gennantown Pike, Plymouth Meeting, PA qf/ FPTFD CITIES 
Cherry Hill Mall. Rle. 38 4 Hsddonttetd Rd„ Cherry Hill, NJ g 

Nanuel Mall, Rte. 59 & Middleiown Road, Manuel, NY 

Hon mouth Mall, Rle. 35 4 Wvckol? Road, Eatorrtown, NJ ©1983 the program store 



To Order Call Toll Free 800-424-2738 
For Information Call (703) 556-9778 

Mailorders: 

Send check or M O for total purchase plus $2.00 shipping and handling VA add 4% sates tax. 
Charge cards — include ail embossed information 
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CHECKS /BAS 

Continued trcm pag* 1 

the information is entered for it, and 
then the "B" option from Menu Item 6 
is chosen to "Balance" the Checks and 
Statement. It is suggested that this 
be done with the Display first, and 
after any errors are corrected, you 
can then produce a Printer Output. 
The only "SPECIAL" item to he aware of 
is that BOTH the Check and Statement 
Files MUST include a Deposit No. "D-l" 
(normally the first Deposit); this is 
the Balance from Last Month, which is 
compared often in balancing the 
t checks and statements. Menu Item No. 
6 provides an overall Procedure for 
using the Program, and provides an 
easy way back to the Menu by selecting 
the "A" option, so all you nave to do 
is "RUN" the Program, select #6 from 
the Main Menu to see what needs to be 
done first, and select "A* to get back 
to the Main Menu to accomplish that 
task. (Don't forget to Save any Data 
that you have entered - I normally 
name my Data Piles JAN-C-83 for 
January, 1983 Checks, FEB-C-83 for 
February Checks, JAN-S-83 for the 
January Statement, FEB-S-83 tor the 
February Statement, etc.) Changes to 
any items are easy through Main Menu 
selection #2, "VIEW OR CHANGE DATA", 
All in all, you will find it hard to get 
into trouble with this program, so go 
ahead and USE IT. 

Rather than outline the procedure tor 
using the Program, you can "read the 
listing" to get a feel for how it works 
by locating the Line Number to "GOTO" 
tor each Menu Selection. Pot example, 
the Main Menu is in lines 40-158; lines 
170 and 180 send you to the 
appropriate section of the program. 
If you select Item #6 from the Main 
Menu, the program goes to line number 
3110, where lines 3120 through 3160 
indicate that you would first input 
the Statement Data, then LAST MONTHS 
Check Data (which you would read in 
from a File) and "Balance" the 
Statement to cancel the checks from 
last month, then "output" THAT data to 
a File (if ALL checks have been 
cancelled, that file will be marked as 
"Closed" so you will know that ALL of 
the checks have been cancelled) ♦ You 
MAY need to go back two or three 
months if those Check Files have not 
been closed yet due to outstanding 
checks. Then you Input THIS MONTHS 
Checks and Deposits (either thru Main 
Menu #1 or from a File, or both) and 
again "Balance" the Statement to 
cancel any checks in this months File 
that are in this Statement, and SAVE 
the new File for this month. What you 
are doing with the Computer is the 
same thing you would do by hand when 
you receive a Bank Statement; go back 
and mark all of the Checks that have 
come in so you can determine those 
still outstanding and "Balance your 
Check Book". The Statement 
information input provides for both a 
fixed Bank Charge and a Percentage 
Charge,- enter a amount if they do 
not apply to your situation. Also, you 
may need to "dream up" Statement 
Numbers if your Bank does not use 
them; some Check Deposit slips have a 
number that has been marked out that 
you can use, or you can use something 
like 6-1 for the first Deposit in June, 
6-2 for the next, etc. At any time 

4 



your can select Item "A" to get back to 
the Main Menu. (NOTE: you need to 
have at least one check in the System 
to get the Item 6 Menu displayed - re 
Line Number 3110 — "N" must be 
greater than 0.) 

CHECKS has been developed over a 
period of time while working with my 
own Checking Account; adding this and 
deleting that, until it has become a 
very handy Program to have on the 
Computer. As with any Program, there 
is still this or that to try, but it is 
a fully functional program as it now 
stands. Since I have a 32K Color 
Computer, there has been no need to 
compress the program as of this time, 
so you will find the layout of the 
Program and the Code to be fairly 
modular and easy to follow, it would 
not be hard tor a Programmer with a 
little experience with the Radio Shack 
BASIC to "slim" it down some (this 
would also be a good project for those 
learning BASIC to tackle - it is not 
complex, just long), or to change it 
to a Program which calls separate 
programs from the Menu to get the 
System running on a 16K Color 
Computer, I originally started with a 
Tape System, then went to the Disk 
System; BOTH Systems are supported by 
this one Program. 

CHECKS uses Pokes and Peeks in two 
locations In the Program; one at Line 
Numbers 4380 and 4730 which 
effectively clears all data out of the 
computer to leave as much memory as 
possible for the Search through all 
Files for a particular item (it is used 
when Menu Item 9 is used), and the 
other is a Machine Lanquaqe Routine 
loaded by Lines 5340 thru 5410 and 
used in Lines 5480 thru 5500 « Ttiis 
routine SLOWS the Display of the 
Directory so you can read it as it is 
dispalyed (this routine was pulled 
from a Program in "The RAINBOW"). The 
value "Poked" in Line 5480 determines 
how fast the display scrolls. The 
Pokes in Line 5380 set up the "hooks", 
while the Data Statements contain the 
Code. The Search is much slower 
without the Pokes to open the buffer, 
with many more Disk accesses, but the 
program will work without them, and it 
will also work without the "slow down* 
for the Directory Listing. 

Albert Yates 

5 GOTO5340 

10 GOTO20 

11 SAVE"CHECK":END 

20 CLEAR3500:DIMT$(100):DIMD$(10 

0) :DIMP$(100) :DIMS$(100) iDIMA(10 

0) jDIMFS (100) :DIMUS(100) :DIMAM(1 

00):DIMAM$(100) 

30 AA=20000:O=1 

40 CLS: PRINTS 13, "MENU" 

50 PRINT: PRINT" 1> INPUT CHECK DE 

P.& STA.DATA 

60 PRINT" 2> VIEW OR CHANGE DATA" 

70 PRINT" 3> OUTPUT DATA TO TAPE 

FILES 

80 PR INT" 4 > INPUT DATA FROM TAPE 

FILES 
90 PRINT* 5> PRINT DATA ON PAPER 
100 PRINT" 6> BALANCE CHECK BOOK 
110 PRINT" 7> OUTPUT DATA TO DISK 

FILES 
120 PRINT" 8> INPUT DATA FROM DIS 
K FILES 

130 PRINT" 9> SEARCH ALL FILES (J 
AN-DEC) 
140 PRINT" D> TO SEE DIRECTORY 



150 PRINT: PR1NT"SELECT> 1-2-3-4-5 

-6-7-8-9-D 

160 CS=INKEY$ 

170 IFCS="1"THENGOTO200ELSEIFC$- 

" 2"THEMGOTO50 0ELSE IFCS- " 3"THENG0 

TO640ELSEIFC$="4"THENGOTO950ELSE 

IPC$="5"THENGOTO1090ELSEIFC$="6" 

THENG0TO31 10ELSEIFC$="9"THENGGTO 

4360ELSEIFC$="D"TeENGOTO5350 

1B0 IFCS="7"THENGOTO2140ELSEIFC$ 

="8"THENGOTO2460 

190 GOTO160 

200 CLS : PRINT: PRINT; PRINT" (l)INP 
UT CHECKS OR DEPOSITS": PRINT" (2) 
INPUT BANK STATEMENT" i PRINT: PRIN 
T"(M)TO GO TO MENU": PRINT 

201 PRINT"DO not USE THE $ SIGN 
ON INPUT. ": PRINT: PR INT" PROGRAM W 
ILL NOT DISPLAY NUMBERS PROPERLY 
THAT ARE OVER $9999. 99": PRINT; PR 
INT: PRINT" SELECT— > 1-2-M" 
210 CS=INKEY$ 

220 IFCS="1"THENGOTO240ELSEIFC$- 

" 2"THENGOTO2670E LSEI FC$ = "M'THENG 

OTO40 

230 GOTO210 

240 lFJ=0THENCLS:PRINT§192 r "ENTE 

R BALANCE FROM PREVIOUS FILE AS 

ENTRY #D-1 A DEPOSIT" :F0RX»1TG25 

00:NEXTX 

250 IFN<1THEN N=l 

260 FORJ^N TO100 

270 CLS 

280 IF J=l THEN GOTO 300 

290 PRINT "LAST CHECK #="T$((J)- 

1) 

300 PRINT" ENTRY#" (J) , : PRINT"MEM= 

";:PRINTMEM: PRINT 

320 IFC$="2"THENPRINT"TYPE <XX> 

WHEN FINISHED!": PR INT" ENTER A <C 

> TO CHANGE TO CHECKS.*: PRINT: PR 

I NT" ENTER YOUR DEPOSIT INFORMATI 

ON." 

330 TFCS="2"THENf;OTO350 

340 PRINT" TYPE <XX> WHEN FINISHE 

Dl": PR INT" ENTER A <D> TO CHANGE 

TO DEPOSIT": PRINT: PRINT"ENTER YO 

UR CHECK INFORMATION." 

350 INPUT"NUMBER"jT${J) 

360 IFT$(J)=*XX*THEN N=J:GOTO40 

370 IFT$(J)»"C"THEN C$="l";N=JsG 

OTO 250 

380 IFTS(J)="D"THEN C$»"2".*N*J:G 

OTO 250 

390 INPUT"DATE:",-D$(J) 

400 INPUT" PAYABLE TO:";P$(J) 

410 IFC$=*2"THENPRINT" PAYABLE FR 

OM" : INPUTFS (J) 

420 CLS:PRINTe7,"*****ACC0UNT*** 

**": PRINT J PRINT" ( 1 ) AUTO" ,"( 5 ) FCO 

D" , " (2) HOME (IT) * , " (6)CL0THES" , " ( 



3)H0ME(EX) "," (7) PET&ENT. 



(4). VIE 



DICAL","(8)DEP0SIT",,"(9)Y0U DEF 

INE" ; PRINT: PR1NT"SELECT-1 -2-3-4- 

5-6-7-8-9 

430 CC$=INKEY$ 

440 IFCCS="1"THENS$(J)='AUT0":G0 

TO480ELSE1FCC$="2"THENSS (J) ="HOM 

E(IT) ":GOTO480ELSEIFCC$="3"THENS 

$ (J) ="HOME(EX) " ;GOTO480ELSEIFCC$ 

="4"THENS$(J) ^"MEDICAL" :GOTO480E 

LSEIFCC$=" 5"THENSS (J) ""FOOD" :GOT 

O480ELSEIFCC$="6"THENS$ (J)="CLOT 

HES":GOTO480 

450 IPCCS=-"7"THENS$(J)="PETSENT. 

* :GOTO480ELSEIFCC$="8"THENS$ (J) = 

"DEPOSIT" :GOTO480ELSEIFCC$="9"TH 

ENGOTO470 

460 GOTO430 

470 INPUT'YOU DEFINE ";S$(J) 

475 GOT0485 

480 PRINT:PRINTS$(J) 

485 PRINT: INPUT" CHECK OR DEP. AM 

0UNT:$";A(J) 

490 NEXTJ 

500 CLS 

510 PRINT : PRINT: PRINT" (1) VIEW Eft 

TA AND MAKE CHANGES* : PRINT" (2) TO 
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VIEW SELECTED DATA* i PRINT" (3>T 
VIEW TOTALS AMD 1": FRUIT" (4) TO 

VIEW OR CHANGE STATEMENT" : PRINT 
"(M)TO GO TO MENU" SPRINT: PRINT" I 
NPUT SELECTION— >l-2-3-4-M" 
520 C$-INKE¥$ 

530 IFCS^"1"THENGOTO550ELSEIFC$= 
■2"THENGOTO1270ELSEIPC$="3"THENG 
OTO1680ELSEIFC$="4"GQTO2860ELSEI 
FCS » "M"THEM3OTO40 
540 GOTO520 
550 IFN=0THENGOTO2210 
560 FORJ-1TON 
570 CLS 

580 PRINT@l,OX$" <CHECKS> FILE " 
FC$ 

590 PRINT@%, "ENTRY # "J:PRINTT 
OTAL ENTRYS ARE"N:PRINT"NUWBER - 
"T$ (J ) : PRINT" DATE =" D$ (J) 1 PRIN 
T*PAY TO ="P$(J):PRINT"ACC0UNT=" 
S$ (J) : PRrwr"AMCUNT ="; : PRINTUSIN 
G"$$f###.##";A(J) 
600 PRINT: PRINT" PRESS<BAR>TO VIE 
W NEXT ENTRY": PRINT: PRINT" PRESS< 
OTO CHANGE ENTRY": PR rNT"PRESS<M 
>TO GO TO MENU" 

610 C$«INKEY$:IFC$=""THEN610ELSe 
I FCS ="C"THENGOTO20a0ELSEI FC$ ="M* 
THENGOTO40 
620 NEXTJ 

630 PRINT" LAST ENTRY" : FORX=1TO50 
0:NEXTXiGOTO40 

640 CLS; PRINT§8 r "OUTPUT TO TAPE 
FILES" 

650 PRINT: PRINTREWIND TAPE PRES 
S<PLAY>ONLY 

660 PRINT*ENTER<M>TO GO TO MENU 
670 PRINT: INPUT" INPUT FILE NUMBE 
R 1-12";AGM$ 

680 IFA3MS="M"THENGOTO40 
690 A«VAL(AGM$) 
700 IFA<1ORA>12THENGOTO670 



710 
720 
730 



FA-1THENGOTO810 
PC$-"4"TIIEN AA-lOflflfl 
MOTOR ON 



740 PRINT" POSITIONING TAPE TO FI 

LE#"A 

750 IFA=2THENGOTO770 

760 FORY-lTOA-1 

770 FOR X»1T0AA:NEXTX 

780 IFA=2THENGOTO800 

790 NEXTY 

800 MOTOR OFF 

810 IFC$="4"THENGOTO970 

820 PRINT: PRINT" (l)OUTPUTING CHE 

CKS":PRINT"(2)OUTPUTING BANK STA 

TEMEMT : PRINT"TYPE<M>TO GOTO MEN 

U": PRINT: PRINT* AFTER PRESSING<PL 

AY«rRECORD>":PRINT"MAKE SESECTION 

— >l-2-M 

830 CCS=INKEY$ 

840 IPCCS-"1"THENGOTO860ELSEIFCC 

$ »"2"THENGOTO2970ELSE IFCC$="M"TH 

ENGOTO40 

850 GOTO830 

860 CLS: PRINTS 192, "DATA IS NOW B 

EING SAVED ON TAPE* 

870 OPEN"0",#-l, "CHECKS* 

880 PRINTI-1,N 

890 FORJ-1TON 

900 PRmTf-l,T$<J),D$(J) ( P$(J),S 

${J),A(J),F$(J) 

910 NEXTJ 

920 CLOSE! -1 

930 PRINT"DATA IS NOW SAVED ON T 

APE" : F0RX=1T01 500 : NEXTX 

940 GOTO40 

950 CLS: PRINT@8, "INPUT FROM TAPE 

FILES" 
960 GOTO650 

970 PRINT (1) INPUTTING CHECKS" :P 
RINT" (2) INPUTTING BANK STATEMENT 
" : PRINT*TYPE<M>TO GOTO MENU* : PRI 
NT: PR INT* AFTER PRESS1NG<PLAY>":P 
RINT" MAKE SELECTION — >l-2-M 
980 CC$=INKEY$ 

990 IFCCS="1"THENGOTO1010ELSEIFC 
C$»" 2* THENGOTO304 0E LSEIFCC$-"M"T 

itcwaarrodfl 

1030 GOTO980 



1010 PRINT* DATA IS NOW BEING LOA 

DED IN* 

1020 OPEN" I", #-l f "CHECKS" 

1030 INPUT#-1,N 

1040 FORJ-ITON 

1050 lNPUT#-l,TS(J) r D$(J),P$(J>* 

S$(J),A(J),F$[J, 

1060 NEXTJ 

1070 CLOSEl-1 

1080 PRINT DATA IS NOW LOADED IN 

TO THE COMPUTER" :FORX=1T01 50 

0:NEXTX:GOTO40 

1090 CLS: PRINT: PRINT: PRINT '(1)P 

RINT ALL CK.&DP, ON PAPER": PRINT 

"(2) PRINT SELECTED DATA ON PAPER 

": PRINT (3) PRINT STATEMENT ON PA 

PER": PRINT" (M) TO GO TO MENU": PRI 

NT: PRINT INPUT SELECTION— > 1-2-3 

-M 

1100 CPS-INKEY$:IPCP$»"l"THENGOT 

O1120ELSEIFCP$="2"THENGOTO1480EL 

SE1FCP$»"3"THENPN=2:GOTO2860ELSE 

I FCPS="M"THENGOTO40 

1110 GOTO1100 

1120 CLS:IFN=0THENGOTO2210ELSEPR 

IhTT§224,OX$" CHECKS AND DEPOSITS 

": PRINT ARE BEING SAVED ON PAPER 

1130 PRINT#-2," 

"OX$" *** CHECKS AND DEPOSITS 
*** "OX$ 
1140 PRlNT#-2 

1 150 PRINT#-2 , "NUMBER" , "DATE" , "T 
O" , "AMOUNT" , "FROM" 
1160 PRINT#-2:T=0;D=0 
1170 FORJ-ITON 
1180 IFS$(J)-"DEPOSIT"THEND-D+A{ 

J) 

1190 lFS$(J)O"DEP0SIT"THENT»T+A 

(J) 

1200 PL$=LEFT$(P$(J),14) 

1210 PRINT#-2 f T$(J) r D$(J),PLS,:P 

RINT#-2,USING"$$ifl#*t#";A(J),:P 

RINT#-2," "FS'J) 

1230 PRINT#-2 



CoCo POWER 

UNLEASH THE POWER IN YOUR CoCo 
WITH ONE (OR MORE) OF OUR BOARDS. 



■ 



WORD-PAK $139.95 

The WORD-PAK is a video board designed 
10 plug into the expansion port of the Color 
Computer. The board produces an 80 col- 
umn video display that compares easily 
with the high priced terminals. Software, 
included with the board, provides such ter- 
minal functions as; erase to end of line, 
erase to end ol screen, home cursor, x-y 
cursor positioning, etc. and the ability to 
re-program the display for different screen 
formats. This last feature is useful In that it 
■lows software, written for other compu- 
ters (such as the Model I), to be run on the 
Color Computer. Additional software sup- 
port includes a Flex patch, which allows the 
user to run ALL standard F lex software, and 
an enhanced version of TEXPRO III (text 
editor'processor). 



MEM-PAK $1 10.00 

1GK RAM. ROM expansion board. Expand 
RAM beyond 6-4K (using the C-C BUS) or 
put your programs- utilities in ROM lor in- 
stant loading. The board utilizes 24 pin, 
compatible memory devices. (Supplied 
with 16KRAM). 



P-C PAK * 79.00 

Free up your serial port lor communication 
by adding this fully buffered, Centronics 
compatible, parallel printer port to your 
computer. The cartridge can be supplied 
with an optional real lime clock for $122,95, 



C-C BUS $149.95 

The C-C BUS is an expansion bus which 
connects to the expansion port ol Ihe Color 
Computer and provides Ihe user with six, 
software selectable, expansion ports. The 
bus is completely compatible with any size 
system and automatically senses system 
size to prevent contention problems, A uni- 
que feature of the C-C BUS is the ability to 
expand system memory size beyond 64K 
by adding one (or more) MEM-PAKs to Ihe 
bus. A typical system might contain a disk 
controller . a parallel pnrrter cartridge , a 1 6K 
RAM board, and a WORD-PAK. all instal- 
led and available to the computer. 



P ROTO CoCo $ 10.95 (3/S20) 

Build your own expansion projects on this 
prototyping baord that will mount inside a 
disk controller case when you're finished. 
Included is a manual with several expan- 
sion ideas. 



BARE BOARDS 

Save money by building your own. We will 
supply complete documentation including 
schematics, layout and parts list- 
WORD-PAK BB $17.95 

C-C BUS BB $22 95 

P-CPAKBB $17.95 

MEM-PAK BB $14.95 



SPECIAL: 

To celebrate Color Micro Journal's premier 
issue, we are offering the C-C BUS and the 
WORK-PAK at special prices. If you order 
belore September 30, 1983 and you men- 
tion thai you saw the add in Color Micro 
Journal, you can purchase the C-C BUS for 
only $129,95. Or you can purchase the 
WORK-PAK for only $99.95 il you order it 
with the C-C BUS al the regular price. 



MAIL ORDERS 

Send check, money order, MASTER- 
CARD VISA (include card number, inter- 
bank number, expiration date and signa- 
ture) for total purchase price, plus S2.50 for 
shipping and handling (Canadian orders 
please add $5. 00). New Jersey residents 
add applicable sales lax. 



V 



inc. 

P.O. BOX 813 

N. Bergen, N.J, 07047 

(201)330-1898 
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1240 PRINTf-2, "TOTAL CHECKS-", :P 

RINT#-2,USING"$$#t##.##"jT 

1250 PRINT#-2, "TOTAL DEP0S1TS=", 

: PRINT! -2, USING" $$####. !t"?D 

1260 GOTO40 

1270 CLS:IPN-0THENGOTO2210ELSEPR 

INT£7, "WHICH ACCCUNT?": PRINT: PRI 

NT" (1) POOD" , " (6) AUTO" , " (2) HOME (I 

T) " , " (7 ) CLOTHES" , " (3 ) HOME (EX) " , " 

(8)PET&ENT.","{4)MEDICAL","(9>DE 

POSIT" # " (5) CHECK #"," (A)CHECK NA 

ME" ,, "(B) YOU DEFINE" SPRINT i PRINT 

"SELECT-1 -2-3-4 -5-6-7-8-9 -*-B 

1280 C$=1NKEY$ 

1290 IFC$="1"THENB$«"FQOO":GOT01 

350ELSEIFC$-"2"THENB$="HQME { IT) " 

: GOTOl 350ELSEIFC$="3"THENB$="HOM 

E (EX) " :GOTO1350ELSEIFC$-"4"THENB 

$="MEDICAL" iGOTOl350ELSEIFC$=*5" 

THENGOTO1320ELSEIFC$= 1, 7"THENB$=" 

CLOTHES": GOTOl 350 

1300 IFC$=*8"THENB$="PET&ENT,":G 

OTO1350ELSEIFC$="9"THENB$="DEPOS 

IT" :GOTO1350ELSEIFCS="6"THENB$=" 

A1JTO" : GOTOl 350ELSEIFC$-"A"THENGQ 

TO1340ELSEIFC$="B*THENGOTO1330 

1310 GOTO1280 

1320 INPUTENTER CHECK # *;B$:GO„ 

TO1350 

1330 INPUT" ENTER YOUR ACCOUNT "; 

B$:GOTO1350 

1340 INPUT" ENTER CHECK NAME ";B$ 

1350 CLS:T=0:P=0 

1360 PRINTS, "***"B$"***" 

1370 FORJ=LTON 

1380 IFB$=S$(J)THENT*T+A(J) : P=P+ 

1 

1 385 IFB$=T$ (J) ORB$=LEFT$ (T$ (J) , 

LBN(T$ (J) ) -1)THENT=T+A(J) 

1390 IFB$=P$(J)THENT=T+A(J) 

1395 IFB$=T$(J)ORB$=LEFT$(T$(J) f 

LEN(T$ (J) ) -l)THENPRINTTS(J) "**"D 

$ (J) "**"P$(J) "**"S$(J) JPRINTUSIN 

G*$$#IHK##";A(J) 

1400 IFB$^$(J)THBNPRINTT$(J)*** 

"D${J) "**"P$ (J) "**"? sPRINTUSING" 

$$###!. #t*:A(J) 

1410 IFB$=P$(J)THENPRINTTS(J)"** 

"D$(J) ***"S$(J) »**"j :PRINTUSING" 

$$#ill,#i";A(J) 

1420 IF P=10THEN PRINT" <MORE> PRE 

SS<ENTER>"; : INPUT P 

1430 NEXTJ 

1440 PRINT-TOTAL OF-"B$"-IS •; sP 

RlNTUSING"$S#l#t.|# H ?T 

1450 PRINTTO CONTINUE PRESS<SPA 

CE BAR>" 

1460 C$-INKEY$:IFC$=" M THEN1460 

1470 GOTO40 

1480 CLS:IFN=0THENGOTO2210ELSEPR 

INT07, "WHICH ACCOUNT?"; PRINT: PRI 

Nr (l)FOOD" f " (6)AUTO" , ■ (2)H0ME(I 

T) ■ r " (7) CLOTHES" , " (3) HOME (EX) ■ , " 

( 8 ) PETSENT, " , " ( 4 ) MEDICAL" , ■ ( 9 ) DE 

POSIT", "(5) YOU DEFINE": PRINT: PRI 

NTSELECT-l-2-3-4-5-6-7~8-9 

1490 C$^INKEY$ 

1500 IFC$»"l"THENB$="F0OD":GOTQl 

540ELSEIFC$="2"THENB$-"HOME ( IT) ■ 

:GOTO1540ELSEIFC$»"3*THENB$="HOM 

E (EX) " :GOTO1540ELSEIFC$="4"THENB 

$="MEDICAL" :GOTO1540ELSEIFC$=" 5" 

THENGOTOl 530ELSE IFC$= " 6 "THENB$=" 

AUTO'': GOTOl 540 

1510 IFC$="7"THENBS="CLOTHES"sGO 

TO1540ELSEIFC$»"8"THENB$="PET&EN 

T . " : GOTOl 54 0E LSE IFC$= "9 "THENB$»" 

DEPOSITS GOTOl 540 

1520 GOTO1490 

1530 PRINT: INPUT YOU DEFINE "?B$ 

1540 CLS:T=0 

1550 PRINT@224,"SLECTED DATA IS 

NOW BEING PRINTED ON PAPER 

■ 

1560 PRINT#-2,, *********** "B$" 

IN "OX$" *********** 

1570 PRINT! -2 

1 580 PRI NT# -2 , "NUMBER" , "DATE" # "T 



O" , "AMOUNT" , "FROM" 
1590 PRINT#-2 
1600 F0RJ=1T0N 

1610 IFB$=S$(J)THENT=T+A(J) 
1620 IFB$=S$(J]THENPL$»LEFT$(P$( 

J), 14) 

1630 IFB$=S$(J)THENPRINT#-2,T$(J 
) ,D$(J) , PL$, ;PRINT#-2 , USING" $$## 
##.#*";A{J) f ;PRINT#-2 r " "F$( 

J) 

1640 NEXTJ 

1650 PRINTt-2 

1660 PRINT#-2, "TOTAL OF"," **** 

* -b$- ***** IS", SPRINT* -2, USING 

"$$###!. ##";T 

1670 GOTO40 

1680 T=0:B=0jC=0jD-0:E-0:F=0:G=0 

:Q-0:S=0 

1690 FORJ-ITON 

1700 T=T+A(J) 

1710 IFS$(J)="AUTO"THENB=>B+A(J} 

1720 IFS$(J)="FOOD"THENC^;+A(J) 

1730 IFS$(J)="HQME(IT)"THEND=D+A 

(J) 

1740 IFS$(J)="HCME(EX)"THENQ-G+A 

(J) 

1750 IFSS (J) -"CLOTHES" THENE-E+A( 

J) 

1760 IFS$(J)="PET&£NT,"THENF=F+A 

CJ) 

1 770 IFSS (J ) ="MEDICAL"THENG=G+A ( 

J) 

1780 IFS$(J)="DEP0SITTHENS=S+A( 

J) 

1790 IFS$(J)*"DEPOSIT"THENT=T-A( 

J) 

1800 NEXTJ 

1810 IFT=0THENPRINTNO DATA IN F 

ILE":GOTO 1450 

1820 H=B/T*100;I=»C/T*100:K=DA*1 

00:L=E/T*100:M=F/T*100:O=G/T*100 

:R-O_/T*100:U=S-T 

1830 CLS 

1840 PRrNT ,r CHFJCKS-"rNT(T)"BAL.-* 

INT(U) 

1850 PRINTAUTQ ="B,"OR*INT{H) 

"%" 

I860 PRI NT" FOOD -"C # "OR" INT (I) 

"ft" 

1870 PRINTHOME-I =*D,"0R"INT(K) 

"%" 

1880 PRINTHOME-E ="Q,"OR"INT(R) 

Han 

1890 PRINTCLOTHES="E,"OR"INT(L) 

1900 PRlNT"PET&ENT="F,"OR"INT[M) 

" i " 

1910 PRINT"MEDICAL="G,"0R"INT(0) 

"%" 

1920 PRINT" AUTO" : PRINT FOOD" : PRI 

NT HOME ( IT) ": PRINT" HOME (EX) ": PRI 

NTCLOTHES" : PRINT PETS ENT. ": PRIN 

T"MEDICAL" 

1930 Y=264rFORX*lTOH*.4iPRINT@Y+ 

X , CHR$ ( 1 4 3+32 ) ; I NEXTX : PRINTI NT (H 

)"%" 

1940 Y=296jFORX=1TOI*.4:PRINT#Y+ 

X,CHR$ (143+48) ; :NEXTX:PRINTINT(I 

)"%" 

1950 Y»328:FOPX=iTOK*.4:PRINT@Y+ 

X,CHR$ (143+16) ; tNEXTX: PRINTINT(K 

)"%" 

1960 Y=360iFORX=lTOR*.4;PRINT§Y+ 

X,CHR$ (143+96) ,- :NEXTX: PRINTINT(R 

)"%" 

1970 Y-392:FORX=1TOL*.4:PRINT§Y+ 

X,CHR$ (143+64) ; rNEXTX: PRINT INT (L 

1 980 Y=4 2 4 : F0RX=1TCM* . 4 ; PRINT@Y+ 
X,CHR$ (128) ; :NEXTX:PRINTINT(M) "% 

* 

1990 Y»456:FORX=1TOO*.4:PRINT&Y+ 
X,CHR$ (143+112) i :NEXTX: PRINT INT( 

0)**" 

2000 GOTO1460 

2010 CLS:PRINT§12,"ENTRY#="(J) 

2020 PRINT (1) NUMBER -"T$(J):PR 

INT(2)DATE ="D$(J):PRINT(3) 



PAY TO ="P$ (J) : PRINT (5) ACCOUNT 
="SS (J): PRINT (6) AMOUNT =";tPR 
INTUSING^SIf*!.**"; A(J) : PRINT'P 
RESS(7)T0 CONTINUE": IFSS (J )»"DEP 
OSITTHENPRINT (4) PAY FRGM="F$ (J 

) 

2030 PRINT: PRINTMAKE SELECTION- 

-1-2-3-4-5-6-7 

2040 C$=INKEY$ 

2050 IFC$="1"THENGOTO2070ELSEIPC 

$ =" 2"TH£NGOTO208 0E LSEI FC$ =" 3"THE 

NGOTO2090ELSEI FC$=" 4 B THENGOTO210 

0ELSEI FC$=" 5 "THENG0T021 10E LSEI FC 

$=" 6 "THENG0T02 1 30ELSEIFC$«" 7 "THE 

NGOTO600 

2060 GOTO2040 

2070 INPUT"TO CHANGE NUMBER TYPE 

NEW DATA ";T$(J):GOTQ2010 
2080 INPUTTO CHANGE DATE TYPE N 
EW DATA ";D$(J) JGOTO2010 

2090 INPUTTO CHANGE PAY TO TYPE 

NEW DATA ";P$(J):GOTO2010 
2100 INPUTTO CHANGE PAY FROM TY 
PE NEW DATA" ; F$ ( J) : GOTO20 1 
2110 PRINTTO CHANGE ACCOUNT TYP 
E NEW DATA": PRINT" AUTO", "FOOD", 11 
HOME ( I T) ", "CLOTHES" ," HOME ( EX )", ■ 
PET&BNT. " , "MEDICAL" , "DEPOSIT 
2120 INPUTS$(J):GOTO2010 
2130 INPUTTO CHANGE AMOUNT TYPE 

NEW DATA "iA(J):GOTO2010 
2140 CLS: PRINTS 35, "OUTPUT DATA T 
DISK FILES" : PRINT: PRINT (1) OUT 
PUT C.& D. TO DISK": PRINT" (2) OUT 
PUR BK. STATEMENT TO DISK": PRINT 
"(3) OUTPUT C.&D. W/BACKUP" : PRINT 
" (4) OUTPUT STATEMENT W/BACKUP" : P 
RINTTYPE<M>TO GO TO MENU": PRINT 
: PRINT" INPUT SELECTION 1-2-3-4 
2150 PRINT: PRINTBACKUP REQUIRES 

DISK IN DRIVE 1 
2160 C$=INKEY$ 

2170 IFCS^"1"THENGOTO2190ELSEIFC 
S="?»THENmTOni 0EI^RTFC$= H M"THE 
NGOTO40ELSEIFC$="3"THENGOTO2190E 
LSEIFC$="4"THENGOTO2310 
2180 GOTO2160 

2190 IFFREE(0)<2THENGOTO5470ELSE 
PRINT6 262, "WHAT MONTH-YEAR?": PRI 
NT C.& D. EXAMPLE": PRINT 

■ JAN-C-82 OR*,"JAN-C-83 H ," F 
EB-C-82 OR" , "FEB-C-83" 
2200 INPUTOXS 

2205 IFLEN(0X$)>8THENPRINTFILE 
NAME TOO LONG" :GOTO2200 
2210 IF N=0 THENCLS: PRINT@224," 
NO DI^TA IN COMPUTER" ;FORX=1T01 50 
0:NEXTX:GOTO40 
2220 GOTO3900 
2230 OPEN"0",U,OX$ 
2240 IFO>0THENFC$="OPEN" 
2250 PRINT#1,N,FC$ 
2260 F0RJ=1T0N 

2270 WRITE#1,T$(J),D$(J),P$(J),S 
$(J),A(J),F$(J) 
2280 NEXTJ 

2290 IFC$="1*THENGOTO2400 
2300 1FC$="3"THEWGOTO2400 
2310 IFFREE(0)<2THENGOTO5470ELSE 
PRINT§ 262, "WHAT MONTH-YEAR?": PRI 
NT@288," STATEMENT EXAMPLE" 

: PRINT JAN-S-8 2 OR" , " JAN-S-8 3 
" , " FEB-S-82 0R" , "FEB-S-83" 
2320 INPUTOM$ 

2325 IFLEN(0M$)>8THENPRINT"FILE 
NAME TOO LONG"JGOTO2320 

2330 IF NK=0THENCL3:PRINT@224,"N 
DATA IN COMPUTER" :FQRX=*1T01 500 

jNEXTX:GOTO40 

2340 GOTO4130 

2350 OPEN"0",#1,OMS 

2360 WRITE#1,CN,DN,NK,SA,SN,SC,S 
T,SD 

2370 F0RK=1T0NK 

2380 WRITE#1,US{K),AM$(K) 

2390 NEXTK 

2400 CLOSEtl 

2410 IFC$="2"THENDRIVE0:SK=0 
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2420 IFC$="1"THENDRIVE0|SK=0 

2430 IPC$=*3*THENDRIVE1:SK=1:C$= 

"l^CLStPRINTSS, "BACKUP DRIVE 1* 

JGOTO3900 

2440 IFC$="4"THENDRIVEl:SK=liC$= 

"2" :CLS:PRINT@8, "BACKUP DRIVE 1" 

:GOTO4130 

2450 GQTO40 

2460 CLS:PRINT@ 35, "INPUT DATA PR 

OM DISK PILES":PRINT:PRIHT"(1)IN 

PUT C.S D, FROM DISK": PRINT" (2) I 

NPUT BK. STATEMENT FROM DISK": PR 

INTTYPE<M>TO GO TO MENU": PRINT: 

PRINT" INPUT SELECTION — >l-2-M 

2470 C$=INKEY$ 

2480 IPCS-* 1"THENGOTO2500ELSE IPC 

S-"2"THENGOTO2580ELSEIFC$="M"THE 

NGOTO40 

2490 GOTO2470 

2500 PRINT* 262, "WHAT MONTH-YEAR? 

•; PRINTS 295, "C. 4 D, EXAMPLE" sPRI 

NT" JAN-C-82 OR" , " JAN-C-8 3" , " 

FEB-C-8 2 OR" , " PEB-C-8 3" 
2510 INPUTOXS 
2520 0PEN"I",#l,OX$ 
2530 INPUT* 1,N,FC$ 
2540 FORJ-1TON 

2550 INPUTtl,T$(J),D${J},P$(J) f S 
$<J),A(J),F$(J) 
2560 NEXTJ 

2570 IFC$-"1"THENGOTO2650 
2580 PRINTS 26 2, "WHAT MONTH-YEAR? 
■ J PRINTS 29 5, "STATEMENT EXAMPLE": 
PRINT" JAN-S-82 OR","JAN-S-83" 
," FEB-S-32 OR","FEB-S-83" 
2590 INPUTQMS 
2600 OPEN" I ",#1, CMS 
2610 INPOTtl,CN,DN r NK r SA ( SN f 9C,S 
T,SD 

2620 F0RK=1TCNK 
2630 INPUT#1,U$(K},AM$(K) 
2640 NEXTK 
2650 CLOSE! 1 
2660 GQTO40 
2670 CLS: INPUT" ENTER # OF CHECKS 

ON STATEMENT" ;CN 
2680 I NPUT" ENTER ft OF DEPOSITS 
N STATEMENT" ;DN 

2690 I NPUT" ENTER MONTH OF STATEM 
ENT";OM$ 

2700 I NPUT - ENTER BALANCE ON STAT 
EMENT"ySA 

2710 INPUT" ENTER INTREST ON STAT 
EMENT";SN 

2720 INPUT" ENTER SERVICE CHARGE 
IF ANY";SC 
2730 INPUT" ENTER TOTAL AMOUNT OF 

CHECKS"; ST 
2740 INPUT" ENTER TOTAL AMOUNT OF 

DEPOSITS" ;SD 
2750 NK=CN+DN+1 
2760 PRINT 
2770 PRINT" INPUT C&D NUMBERS AND 

AMOUNTS 

2780 PRINTTYPE <XX> TO CHANGE L 
AST ENTRY 

2790 PRINT: PRINTENTER FIRST NUM 
BER AND AMOUNT AS D-l THEN THE A 
MOUNT: PRINT 
2800 FOR K^ITONK 

2810 PRINT"#"K;:INPUT"CK OR DEPO 
SIT NUMBER" ; US (K) 
2820 PRINT"f"K;!lNPUT"CK OR DEPO 
SIT AMOUNT" f AM$(K) 
2830 IF U$(K)-"XX"THEN K=K-l:GOT 
02810 
2840 NEXTK 
2850 GOTO 40 

2860 CLS : IFNK=0THENGOTO2330ELSEP 
RINT#-PN,"(S)TATMENT "QMS" BL."S 
A 

2870 PRINT#-PN, "(C) HECKS "CN,"(D 
)EPOSITS "DN 
2880 PRINT#~PN," <NUMBER> 

<AMOUNT> 
2890 NK=OJ+DN+l 
2900 GOTO4750 
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2910 print#-PN, "**************** 
*****#****#****■ 

2920 CLS:PRINT#-PN:PRINT#-PN:PRI 
NTf-PN,*{E) TOTAL CHECKS* *="; :PRI 
NTi-PN , USING" $$####.##"; ST : PRINT 
#-PN, "(F) TOTAL DEPOSITS-"; : PRINT 
#-PN,USING"$$###t.tr;SD 
2930 PRINT#-PN,"(G) INTREST****** 
*■ ";:PRINTi-PN r USING"SS##.#i"; 
SN:PRINT#-PN r "(H) SERVICE CHAflGE= 
■| :PRINT*-PN,USING"$$##.##"?SC 
2940 PRINT 

2950 IFCPS="3"THENPN=0 
2960 GOSUB4890:GOTO40 
2970 CLS :PRINT§192 f "DATA IS NOW 
BEING SAVED ON TAPE" 
2980 0PEN*0*,#-1, "STATEMENT" 
2990 PRINT#-l,CN,DN,KN f SA r SN,SC, 
ST,SD 

3000 F0RK=1T0NK 
3010 PRIhTP#-l r US(K),AM$(K) 
3020 NEXTK 
3030 GOTO920 

3040 CLS: PRINTS 192, "DATA IS NOW 
BEING LOADED IN" 
3050 OPEN" I ",#-1, "STATEMENT" 
3060 INPUT#-l f CN,DN r KN,SA,SN,SC, 
ST,SD 

3070 FORK-ITONK 
3080 INPUT#-1,U$(K),AM$(K) 
3090 NEXTK 
3100 GCTO1070 

3110 IFN»0THENGOTO2210ELSECLS:PR 
INT"BALANCING CK BOOK WITH STATE 

KENT" 

3120 PRINTS 38, "<LIST OF PROCEDUR 

E>" 

3130 PRINT" (1) INPUT STATEMENT DA 

TA": PRINT" (2) INPUT LAST MONTHS C 

K DATA": PRINT" ( 3) ENTER<B>BALANCE 

STATEMENT": PRINT" (4) OUTPUT LAST 

MONTHS CK DATA" 

3140 PRINT" < 5) INPUT THIS MONTHS 
CK DATA" : PRINT" (6) ENTER<B>BAIANC 
E STATEMENT" : PRINT" (7) OUTPUT THI 
S MONTHS CK DATA" 
3150 PRINT: PRINT" (A) TO INPUT OR 
OUTPUT DAT(MENU)*:PRINT"(B)TO BA 
LANCE STATEMENT": PRINT™ MAKE SELE 
CTION— >A-B 
3160 CC$=INKEY$ 

3170 IF CC$="A'THENGOTO40ELSEIFC 
C$=*"B"THENGOTO3190 
3180 GOTO3160 

3190 CLS ;PRINT§160,*{1) BALANCE W 
ITH PRINTER": PRINT" (2) BALANCE WI 
THOUT PRINTER"; PRINT: PRINT"MAKE 
SELECTION— 1-2 
3200 CC$=INKEY$ 

3210 IF CC$="1"THENGOTO3230ELSEI 
FCC$="2"THENGOTO3230 
3220 GOTO3200 
3230 CLS :PRINT#236 # "WORKING" 
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3240 IFCCS-"1"THENGOTO3510 

3250 O=0:TA=SA:T-0 

3260 PORJ-1TON 

3270 F0RK=1T0NK 

3280 AM(K)=VAL(AM$(K)) 

3290 IFT$(J)=U$(K)AND A(J)OAM(K 

)THENGOTO3800 

3300 IFT$(J)*US(K)THENT$[J)=TS(J 

)+"C":GOTO3410 

3310 IFRIGHT$ (T$ (J) , 1) *"C"THENG0 

TO3410 

3320 NEXTK 

3330 IFT>0THENGOTO3360 

3340 IFO>0THENGOTO3360 

3350 CLS: PRINT-OUTSTANDING CHECK 

S AND DEPOSITS" 

3360 TA-TA-A(J) :0=O+A(J) 

3370 IFS$(J)«"DEPOSIT"THENT=T+AC 

J) 

3 380 IFS$ ( J ) **DE POS IT" THENTA=TA+ 

(A(J)*2) 

3390 IFS$ (J)- "DEPOSIT" THENOO-A( 

J) 

3400 PRINTT$(J)"**D$(J)"*"P$(J), 

:PRINTUSING"S$##t#.tf"|-A(J) 

3410 NEXTJ 

3420 PRINT 

3430 CLS: PRINT? 128, "TOTAL OF OUT 

DEPOSITS-" , :PRINTUSING*SSi#lt.# 
l";T 
3440 PRINT"TOTAL OF OUT CHECKS- 

■;:PRINTUSING"$SI#ll.#fjO , 
3450 IFO=0THENFC$="CLOSED" 
3460 IFO>0THENFC$="OPEN" 
3470 PRINT"CHECK BOOK SHOULD BE 

"; :PRINTUSING"$$####.##";TA-SN+ 

SC 

3480 PRINT" SUBTRACT SERVICE CHAR 

GE ■;:PR1NTUSING"S$#I.*#";SC:PRI 

NT"ADD INTREST IF ANY "} J PR 

INTUSING"SS#l.#l"fSN;PRINT"NEN C 

HECK BOOK BALANCE";: PR I NTUSIW3"S 

S####.#f?TA 

3490 PRINT 

3500 GOTO1450 

3510 O-0:T=0:TA=SA 

3520 F0RJ=1T0N 

3530 P0RK=1TCNK 

3540 IFT$(J)=U$(K)THENT$(J)»TS{J 

)+*C":GOTO3700 

3550 IFRIGHT$(TS(J),l)="C"THENGO 

TO3700 

3560 NEXTK 

3570 IFO>0THENGOTO3630 

3580 IFT>0THENGOTO3630 

3590 PRINT#-2, **************** W 

ITH "OM$" BANK STATEMENT ******* 

******** 

3600 PRINTi-2 

3610 PRINTi-2," OUT 

STANDING CHECKS AND DEPOSITS 

3620 PRINTi-2 

3630 TA=TA-A(J):0=O+A{J) 
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3640 lPS$(J)=-*DEPOSlT-rHENTA-TA+ 

(A(J)*2) 

3650 IFS$(J)-"DEPOSIT"THENO-0-A( 

J) 

3660 IFS$(JH*DEP0SIT"THENT=T4A( 

J) 

3670 PL$=MID$(P$(J),1,15) 

3680 PRINT#-2,T$(J),DS(J),PLS, 

3690 PRINT#-2,USIllS"S$##i#.##";A 

(J) 

3700 NEXTJ 

3710 PRINT#-2, "TOTAL OF OUTSTAND 

ING DEPOSITS=", :PRINT#-2, USING "$ 

$»###. ##"?T 

3720 PRINT#-2, "TOTAL OF OUTSTAND 

ING CHECKS-", :PRINT#-2,USING*$$# 

i*#.#r?o 

3730 IFO>0THENFC$=*OPEN* 

3740 IFO=0THENFC$= 1, CLOSED" 

3750 FRINT#-2 r "CHECK BOOK SHOULD 

BE",:PRINT#~2,USlNG"$$H#t.##"; 
TA-SN+SC 

3760 PRINT#-2, "SUBTRACT SERVICE 
CHARGE OF", fPRINT#-2, US ING "$$### 

#.#l\-sc 

3770 PRINT#-2,"ADD INTREST OF*,, 

:PRINT#-2 f USING"SS####.##";SN 

3780 PRINT#-2,"NEW CHECK BOOK BA 

LANCE IS ",:PRINT#-2,USING"$$### 

§.##*;TA 

3790 GOTO1450 

3800 CLS:PRINTei60 f "CHECK#"T$(J) 

" AMOUNT DOSEN'T": PRINT" AGREE WI 

TH STATEMENT AMOUNT" 

3810 PRINT:PRINT" CHECKBO 

OK 

3820 PRINT"* "T$ (J)" "D$ (J) " "P$ ( 

J)" "A(J) 

3830 PRINT" STATEMENT 

3840 PRINT"*"U$(K),AM$(K) 

3850 PRINT: PRINT" (l)CHECKBOOK NU 

MBER" : PRINT" (2)CHECKBOOK AMOUNT" 

: PRINT" (3) STATEMENT NUMBER" : PRTN 

T" (4) STATEMENT AMOUNT 

3860 PRINT iPRINT"WHICH ONE TO CH 

ANGE 1-2-3-4 

3870 WTC$=INKEYS 

3880 IFWTCS="2"THENGOTO5150ELSEI 

FWTC$=* 1 "THENGOT054 30E LSEIFWTCS= 

■ 4 "THENGOTO5170ELSE IFWTC$-" 3 "THE 

NGOTO5450 

3890 GOTO3870 

3900 S-3 

3910 DSKI$SK,17,S f A$,B$ 

3920 G$=OXS 

3930 J$^=MID$(A$,1,8) 

3940 IFG$<rSTHENGOTO4050 

3950 H$=MID$(A$,33,8) 

3960 IFG$*HSTHENGOTO4050 

3970 E$=MID$(A$,65,8) 

3980 IFG$=E$THENGOTO4050 

3990 I$-*ID$(A$,97,8) 

4000 IFG$=ISTHENGOTO4050 

4010 IFFL=0THENA$=e$:FL-l:GOTO39 

30 

4020 S=S+1:FL=0 

4030 IFLEFT$(A$,1)"CHR$ (255) THEN 

GOTO2230 

4040 GOTO3910 

4050 CLS:IFSK==0THENPRINT§12,"DRI 

VE 0* 

4060 IFSK=1THENPRINT§12, "DRIVE 1 

■ 

4070 PRINT"THERE IS ALREADY A FI 

LE ON THIS DISK NAMED "OX$ 

4080 PRINT" DO YOU WANT TO WRITE 

OVER THE OLD FILE?" 

4090 PRINT: PRINT" (Y)YES': PRINT" { 

N) NO": PRINT: PRINT" MAKE SESECTION 

— >Y-N 

4100 CC$-INKEY$ 

4110 IFCC$^*Y"THENGOTO2230ELSEIF 

CC$-"N"THENGOTQ40 

4120 GOTO4100 

4130 S=3 

4140 DSKI$SK r 17,S,A$,B$ 

4150 G$=OM$ 

4160 J$=MID$(A$,1,8) 
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4170 IFG$<T$THEN3OTO4280 

4180 H£»MID$(A$,33 r 8) 

4190 lFG$-H$raENGOTO4280 

4200 E$=HID$(AS,65,8) 

4210 IFG$=E$THENGOTO4280 

4220 I$=MID$(A$,97,8) 

4230 IFG$=I$THENGOTO4280 

4240 IFFL*0THENA$sB$:FL=l:GOTO41 

60 

4250 S«S+l:FL-0 

4260 IFLEFT$(A$,1)=CHR$( 255) THEN 

GOTO2350 

4270 GOTO4140 

4280 CLS:lFSK=0THENPRINTei2,"DRl 

VR 0" 

4290 IFSK=1THENPRINT0. 12, "DRIVE 1 

4300 PRINT"THERE IS ALREDY A FIL 
E ON THIS DISK NAMED "QMS 
4310 PRINT: PRINT" DO YOU WANT TO 
WRITE OVER THE OLD FILE?" 
4 320 PRINT" ( Y) YES" : PRINT" (N ) NO" : 

PRINT: PRINTMAKE SELECTION— >Y-N 

■ 

4330 CC$=INKEY$ 

4340 IFCC$="Y"THENGOTO2350ELSEIF 

CCS=*N"THENGOTO40 

4350 GOTO4330 

4360 CLS: PRINT: PRINT" ALL FILES 

(JAN-DEC) SEARCH 

4370 PRINT: PRINT" ENTER<M>TO GO T 

MENU 

4380 PRINT:POKE 35,127:POKE 36,2 

54 

4390 INPUT"ENTER NAME OF CHECK F 

OR SEARCH "?AAS 

4395 IFAAS="M"THENGOTO40 

4400 INPUT"WHAT YEAR 83,84,85, EC 

T."jWY$ 

4410 IFWY$="M"THENGOTO40 

4420 TC=0 

4430 PRINT#-2," ******* 

*** SEARCH ALL FILES (JAN-DEC) * 
********** 

4440 PRINT#-2 

44SS! R»$="JAN-C-"+WY$rGO6U&5l90t 

GOSUB4620 

4460 BBS="FEB-C-"+WY$:GOSUB5190: 

GOSUB4620 

4470 BB$="MAR-C-"-tWY$:GOSUB5l90 

GOSUB4620 

4480 BB$="APR-C-"+WY$:GOSUB5190 

GOSUB4620 

4490 BB$="MAY-C-"-»WYS:GOSUB5190 

GOSUB4620 

4500 BB$="JUN-C-"-IWY$:GOSUB5190 

GOSUB4620 

4510 BB$="JUL-C-"4WY$: GOSUB 5190 

GOSUB4620 

4520 BBS="AUG-C-"+WYS: GOSUB 5190; 

GOSUB4620 

4530 BB$-"SEP-C-"4WY$:GOSUB5190 

GOSUB4620 

4540 BB$-"OCT-<-"4WY$:GOSUB5190 

GOSUB 4620 

4550 BB$»"NOV-C-"4WY$:GOSUB5190 

GOSUB4620 

4560 BB$="DEC-C-*4WY$:GGSUB5190 

GOSUB4620 

4570 PRINT: PRINT" END OF FILES 

4580 FOR X=l TO 80iPRINT#-2 f "-"; 

:NEXT X 

4590 PRINT#-2," 

4600 PRTNT#-2, "TOTAL" ,,,,: PRINT* 

-2 f USING"$$##t#.t#"fTC 

4610 FORX=1TO500:NEXTXjGOTO40 

4620 PRINTBBS 

4630 OPEN" I ",#1, BBS 

4640 INPUT#1,N,FCS 

4650 FORJ=lTON 

4660 INPUT#l r T$(J),D$(J),P$(J) r S 

$(J),A(J),F${J) 

4670 NEXTJ 

4680 CLOSE* 1 

4690 FORJ=1TON 

4700 IF LEFTS £AA$, 3) -LEFTS (P$(J) 

, 3)THENPRINT#-2,TS(J) ,D$ (J) , P$ (J 

),S$(J),:PRINT#-2,USING"$$####.f 
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#";a(j) 

4710 if lefts (aa$, 3) -lefts (ps (j) 

,3) then totc+a(j} 

4720 NEXTJ 

4730 POKE 35, 127: POKE 36,234 
4740 RETURN 
4750 FORK-1TONK 
4760 AM(K)=VAL(AM$(K>) 
4770 PRINT#-PN, K" #"US{K) ,:PRIN 
T#-PN,USING"$$##|#.#*";AM(K} 
4780 IFCPS-"3"THENGOTO4850 
4790 IF K=11THEN GOSUB 4890 
4800 IF K=25THEN GOSUB 4890 
4810 IF K-39THEN GOSUB 4890 
4820 IF K=53THEN GOSUB 4890 
4830 IF K=67THEN GOSUB 4890 
4840 IF K=81THEN GOSUB 4890 
4850 NEXTK 

4860 GOSUB 4890;GOTO2910 
4870 INPUT"TO CHANGE ENTER FIRST 
NUMBER" ;XS 
4880 IF XS>NK THEN GOTO 4870 
4890 IFCP$="3"THENRETURNELSEPRIN 
T*PRESS<ENTER>TQ CONTINUE" 
4900 INPUT" ENTER FIRST DIGIT TO 
CHANGE" ;XS$ 

4910 IF XS$^""THEN RETURN 
4920 IF VAL(XS$)>NK THEN GOTO 49 
00 

4930 IFXS$= B S*THENGOTO5120 
4940 IFXS$="C"THENGGTO5130 
4950 IFXS$-"D"THENGOTO5140 
4960 IFXSS="E"THENGOTO5080 
4970 IFXSS="F"THENGOTO5090 
4980 IFXSS="G"THENGOTO5100 
4990 IFXS$»"H"THENGOTO5110 
5000 CLS:K=VAL(XS$) 
5010 AM(K)=VAL(AM$(K)):PRINT"#"U 
$(K) ,:PRINTUS ING"$###. ##"; AM(K) 
5020 PRINT: PR INT" 1>T0 CHANGE NUM 
B ER" : PRINT" 2 >TO CHANGE AMOUNT" : P 
RINT"3>TO CONTINUE": PRINT: PRINT" 
MAKE SELECTION 1-2-3 
5030 C$=INKEY$ 

5040 IFC$="1"THENGOTO5060ELSEIFC 
$-"?"THENGOTOS070ELSEIFCS-"3"THB 
NRETURN 
5050 GOTO5030 

5060 PRINT: INPUT*TYPE NEW NUMBER 
•/ U$ (K) : CLS:GOTO5010 
5070 PRINT: INPUT"TYPE NEW AMOUNT 
■;AM$(K) :CLS:GOTO5010 
5080 INPUT" ENTER NEW CHECKS TOTA 
L"jST:GOTO2920 

5090 INPUT" ENTER NEW DEPOSITS TO 
TAL"jSD:GOTO2920 

5100 INPUT" ENTER NEW INTREST" ,-SN 
:GOTO2920 

5110 INPUT" ENTER NEW SERVICE CHA 
RGE";SC:GOTO2920 
5120 INPUT* ENTER NEW STATEMENT B 
AL,*;SAjGOTO2860 
5130 INPUT"ENTER NEW NUMBER OF C 
HECKS" i CN : GOTO2860 
5140 INPUT"ENTER NEW NUMBER OF D 
EPOS ITS" ; DN:GOTO2860 
5150 INPUTNEW CHECKBOOK AMOUNT* 
lA(J) 

5160 CLS t PRINTS 236, "WORKING" :GOT 
03250 

5170 INPUT'NEW STATEMENT AMOUNT" 
;AM$(K) 
5180 GOTO5160 
5190 S*3 

5200 DSKI$0,17,S,A$,B$ 
5210 GS-BBS 
5220 J$*MID$(A$,33,8) 
5230 IFG$=J$THENRETURN 
5240 H$=*IID$(A$,1,8) 
5250 IFG$=H$THENRETURN 
5260 E$=MID$(A$,65,8) 
5270 IFG$=£$THENRETURN 
5280 I$=*IID$(A$,97,8) 
5290 IFGS=ISTHENRETURN 
5300 IFFL=0TH£NA$*$:FL=1:GOTO52 
20 

5310 S-S+liPL-0 
5320 IFLEFT$(A$ r l)-CHR$(255)ANDG 
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>10THENGOTO4570 

5330 GOTO5200 

5340 PCLEfcRl :GOTO20 

5350 FORX=i000TO1010 

5360 REAEr\:PQKEX,A 

5370 NEXTX 

5380 POKE383,126:POKE384,3:POKE3 

85,232:rXKE422,126:POKE423,3:POK 

E424,232 

5390 DATA52, 16, 142,0,1 

5400 DATA189,167,211,53 

5410 EATA16,57 

5420 RESTORE :GOTO5480 

5430 INPUT"NEW CHECKBOOK NUMBER" 

;T$(J) 

5440 GOTO5160 

5450 INPUT" NEW STATEMENT NUMBER" 

#*U$(K) 

5460 GQTQ5160 

5470 CLS:PRINT§ 224, "DISK FULL RE 

PLACE DISK" :FORX*1T01 500 :NEXTXtG 

OTO40 

5480 CLS:POKE1003,125 

5490 DIR 

5500 POK£1003,0 

5510 PRINT: PRINT" FREE GRANULES*" 

;:PRINTFREE(0) 

5520 PRINT"PRESS<M>TO GO TO MENU 

5530 C$*INKEY$:IPCS="M"THENGOT04 

0ELSEGOTO5530 



THIS 'N THAT 

continued fro* page 1 



With the knowledge that '68' Micro 
Journal was not reaching the majority 
of the Color Computer Users due to 
It's advanced level of material, we 
began seriously considering publishing 
a "pure Color Computer" magazine also. 
At the time, there was a couple of 
well established Magazines already on 
line, and several more "coming out", so 
we decided to see what would happen 
(relying on a single manufacturer and 
a single computer to support 5 or 6 
magazines seemed a little shaky) . The 
decision to go ahead with the Color 
Micro Journal was based on many 
factors. 

There have been many rumors floating 
around about what Radio Shack will do 
with the Color Computer and 
compatible computers, from dropping 
the Color Computer to a new "Super" 
Color Computer. The normal Radio 
Shack policies of not releasing any 
SOLID information on their future 
plans leaves any one relying on their 
products with the feeling that they 
are skating on thin ice. Witness the 



IBM PC; the day it hit the store, 
there was a LARGE amount of Software 
and Hardware available for it. WHY? 
Because IBM released the information 
needed by those that were going to 
provide independent support for the 
computer in time for it to have a 
viable base of Software and Hardware 
WHEN the computer was available. The 
Color Computer floated along for a 
YEAR before MUCH decent Software 
became available, and about the time 
we start seeing some decent Software 
for it, they change the ROMs and it is 
back to the drawing board for a lot of 
the writers. It should be evident by 
now, to ANYONE, that the amount of 
OUTSIDE Software and Hardware support 
available for a personal computer 
system has a MAJOR effect on it's 
sales potential. I think we will see a 
so-called "Super" CoCo from Radio 
Shack in the future, but that is only 
my OPINION. They sure will be missing 
the boat if they DONT make some "real 
use" of the 6809 Systems, 

It IS fairly certain that they will 
announce a 64K Color Computer which 
will sell for $399; possibly around the 
end of July. We also think that they 
will announce the availability of the 
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STAft-Kaarrs 

I'd like to think all of you who stopped by our booth at the 
Color Computer show in Chicago in April. I certainly 
enjoyed meeting so many old friends and new customers, 
and had a delightful time We even managed to Kv*n up the 
last day of the show by raffling away aTV set and holding a 
Dutch auction. Sure hope there's another show soon! 

If you have a disk system, I'd hike to urge you to use the 
verify option Before saving to the disk, type VERIFY ON 
(or include il in a program) After the disk system writes to 
the disk it reads the data back to make sure il was written 
properly While this really slows everything down, it's a 
worthwhile precaution to help guard against loss of 
programs or data. {Quite common in othet systems, ioo ) 
Several customers have asked about our update pokey. 
Its fairly simple: within 90 days of purchase, an update is 
free — just return the original disk or cassette . After 90 days 
an update costs $10 (to make things interesting,, we will also 
accept one pre 1965 silver dolar.) 

We also have I liberal polity on software upgrades. If you 
now own HUMBUG or STAR DOS, we will give you full 
credit toward the 64K versions- Thai means that 64K 
HUMBUG wis cost you ,ust *20 more, while 64K STAR 
DOS will cost you just $25 more 

What, you say, is so special about the 54K versions? 
Quite a bit, STAR' DOS 64, for example, provides upper and 
lower case display with 40, 51, or 64 characters per line; it 
can be used with 35-, 40- or 80- track drives, single or double 
density, single or double sided But, aside from the fact that 
it provides a simple, straightforward interface to the disk, a 
very interesting aspeci is its compatibility with other 6809 
operating systems. For example, many programs written 
for FLEX"" (a trademark of Technical Systems Consultants 
Inc.) will also work with STAR DOS M We are using TSC s 
text editor and macro assembei with STAR DOS right now. 
They work just fine, but the big difference is that their disk 
format is compatible with other software for the Radio 
Shack disk system. 

As to 64K HUMBUG, that's an interning story loo. This 
HUMBUG runs as a utility under either STAR DOS 64 or 
Flex (that's right, the same HUMBUG runs with either — u 
even rum on bigger systems usmg Fie*,) Thai makes 
HUMBUG unique — it is the only monitor thai runs under 
Color Computer Flex. HUMBUG provides all the facilities 
that are needed for machine and assembly language 
programming and debugging in a 64K environment You ' 
can siart and stop programs, insert breakpoints, even J 
single step through programs. There is jusl no other way to I 
do these things in a 64K Color Computer! 1 ' 

One of the problems with a monthly column is keeping up ( 
with publishing deadlines. As you probably noticed last I 
month, I have already falen behind But at least there is one ' 
consolation — the sooner you fall behind, the more time you , 
have to catch up. See you next month. I 



SPELL 'f* FIX 

Regaidless of whose imi piut-ruor yew use. k-i SPELL *N FIX luid 
jnd lin ynur spelling and typing misldiurs II reads tent taste i I Inn 
yuu can, and spots and c octet ii emirs even expericiH i*d 
proofreaders miss. Il is CLMnpuliMe with .ill Culur Cmntnii.-i !«'■! 
processors S69 39 in the Radw Shark disk uf raflWtlf wtmi.tis. 
$8929 in ihe Flex verswn (20,000 word oVlmrwry is standard. 
optmn.il 75.000 word Super Oclnnary COM 5^0 , Hklitiinn.il ) 

HUMBUG - THE SUPER MONITOR 

A complete monitor and debuggmg system which lets you mpui 
programs and dala into memory, li*i memnry contents, nisei t 
multiple breakpoint*, single bit- u, lesl. checksum, .uid kmm|*.iu- 
memory contents. Find ddld m memory, start and slop piuyr.ims, 

.;|,li.v.ud ..iii.I ffcrwilkud MVr In t,1|l. . .-i.l-m',. 1 If* Cull If ClNll|I..H-| III 

.i k-rnnD.iL iiriiiii'F iir iciiMrie caimfMjifc't, .iiut iiMiri- HUMIU h ■ .in 

<k*k or cdurlie costs rusl flftSSh special frtKveision lur HlX m 
STAR DOS 64 costs J&9.95 

STAB- DOS 

A Disk Operoling System specially designed lor ihv Ci*>r 
Computer , STAR DOS is tully compdimle with your present Cotar 
CnmpuUT disk kiim.il it reads disks wr.lleri Im FxleiHiif Ihsk 
IWi and vKe mesa SI AK IKJS lur IhK <n XfK -.ysti-iir. .,*-.!•■ 
14990, STAR DOS 64 lot MK iy»iems cosis 174 .90. 

STAB FLEX 

The best vnplemenlaiBin oi FLEX for ihe Cuke Compiler. 

Cumpfcle wilh oil ulllltirt, Iril editor, macro assemHfei, .11. 1 
MUMfiUG debug morwkw. fcJSO 00. 

ALL IN ONE - Editor Elc. 

Three program* in one - a lull lunciion Editor, <i Text l' J rm i-^,r 
*nd a Wading Lm, Label program All iht> lot just ISO Requires 
STAR DOS and 32K, or STAR DOS 64, t* FLEX. *i*n.iJy win. I. 

DELS for Data Bases 

DHLS stands tor Dai^ Base Lookup System A super f.isi system 
lur s*-archw»a lor a selected rrcord m a sequential d»k lie. Sullied 
uirih SPELL 'N FIX's 20.000 ™.d d* t«m*ry as a sornpk- data tik- 
lets you kuk up the speftinq iA aity ward in unrk>r FOUR semnde 
mem .tl IZ995 Recmires STAR DOS 

CHECK 'N TAX 

Homr m. -counting patkav c«rWbnes dm klxxik m.iinten.M)i t- and 
income rax iliia Gobelin Written in B&,k lur firfu-r RS D»!.k <« 
Fk-h. %b0 

■EMOTERM 

M MO I LKM iikilurs uiwii CuCuinl»i.ilvi!il,iMii|Ktl>t ,..[>,i,.i,il 
frum a rvrnott lernaul. SI995. 

NEWTALK 

Nl W7ALK .1 mrimpp i-Jbemnr unliiy 1, ,1 mkhni- imi,,h.i,|, 
piot|r<immers which rertds imi menitKy ronteiHS Ihrcwgli iIh- IV 
set spraker f?0 

SHRINK 

SHRINK chji wrsion ul FJi**, m machnv 'rrjriiqi' awl 

extremely last. JI5. 

EDUCATIONAL SOFTWARE 

kttruduttiun to Numerical Methods - cosVge k-wt-l rouue mi 
« vmpuler nkiih. 175 00 

We M 1. 1'lK 1 j%li. t ln- v k_ t'OD, Vfcui, in Unlet Cud NV Sl.ee 
■ k'tidfnis plf,«M- ddtl 4 Mjprocir»<Hr sok-s l.is 



Star-Kits 



.. .FLASHII*** 

, * Lai, HUMBUG 1or 
"* T&4T Micro Color 
Computer tool More m 
^oltware coming. 



P.O. BOX 209 R 
MT KJSCO t NY I05.iy 
(914) 241 0287 



Color Micro Journal 



9 



OS -9 Operating System at the same 
time. The new Radio Shack Price List 
contains a Part Number 26-3030 with a 
list price of $69.95, and a Part 
Number 26-3036 with a list price of 
$99-95. Although there is no 
description of either of these parts, 
we understand that P/N 26-3030 is the 
OS-9 Operating System including the 
Editor, Assembler, and DeBug. This is 
a Standard OS-9 Level 1 System except 
that the Disk Format is different from 
that used by GIMIX, HELIX, etc, P/N 
26-3036 is thought to be BAS1C09. 
The features of BASIC09 are almost 
unbelievable. It is an extremely fast 
BASIC Language that was developed 
specifically for the 6809, and will run 
standard BASIC instructions and 
programs while ALSO having the 
capability of running most Pascal 
Programs WITH VH*Y LITTLE CHANGE, It 
includes a powerful text editor, 
multipass compiler, a run-time 
interpreter, a high-level interactive 
debugger, and a system executive* 
WOW! I OS-9 and BASIC09 are products 
of Microware Systems Corp* (see 
Advertisement this issue). 

OS-9 is an extremely POWERFUL 
Operating System which supports many 
UNIX style operations. This ALSO 
means that it is an EXTREMELY COMPLEX 
Operating System. If you are just 
learning to get along with the Radio 
Shack Disk Operating System, or the 
FLEX Disk Operating System, be ready 
to spend a LOT OF TIME learning to use 
this System, I'm NOT suggesting that 
you do not get OS-9, I just want you 
to begin WITH YOUR EYES WIDE OPEN. If 
Radio Shack can come up with a set of 
Manuals to make the use of this 
Operating System understandable to 
the new computer user, THEY WILL HAVE 
ACCOMPLISHED THE COUP OF THE CENTURY. 
If you are an old hand with UNIX, you 
will have little problem. One thing is 
tor certaLn; you will be the Big Man Oh 
Campus when you get OS-9 running on 
your "little old Game Machine". 

Then there is the "Baby CoCo", or the 
Model 10. This one is a puzzle! 
Rather than sticking with the 6809 
Chip with SOME compatibility with 
something they already have, they go 
off on a tangent and install a 6803 
CPU. Don't get me wrong, the 6803 is 
a good Chip, but NO ONE that was 
supporting the Color Computer has a 
6803 Assembler, or was ready in any 
other way to support that computer. 
Also, as is normal, Radio Shack is not 
using much of the 6803 , sl capabilities 
In the Model 10. "The Word" has it 
that that computer was to be 
competition for VIC-20S, Sinclairs, 
etc. Well, it COULD be a lot more 
computer than either of those 
machines WITH THE PROPER SUPPORT!! 
But, "The Word" also has it that they 
did not expect the Sinclairs to go 
down to $25 in K-Marts, etc., and that 
they only produced ONE production run 
of the Model 10 and are undecided what 
to do with it now (see what the 
problems are with NO SOLID INFORMATION 
from Tandy - would YOU want to invest 
MONTHS of YOUR time and several 
hundred dollars to support a computer 
that you had "heard" may not be 
continued long enough for you to even 
get your product on the market7?) . 

We DO KNOW where DRAGON DATA expects 
to be in the next year. First, in 
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partnership with TANO CORP. at 4301 
Poche Court West, New Orleans, LA 
70129, there will be a 64K DRAGON 64 
available in early August which will 
sell for $399 and be set up for the US 
TV Systems with an RS-232 Port for 
compatibility with the RS Color 
Computer. THEY are actively pursuing 
getting OS-9 running on the DRAGON 64 
(target availability is Sept - Oct 
■83), and TANO will also be selling 
other ALREADY ANNOUNCED products 
such as a twin 6889 based Computer 
aimed at the Business and Educational 
Market, dragon DATA has also 
announced a computer (targeted for 
next year) that will have a unique bus 
structure which will run 68000-based 
and 8086-based software either 
individually or both together* (The 
above information came from an 
Interview with Tony Clarke, Dragon 
Data's managing director, as published 
in the July 1983 Issue of DRAGON USER 
- distributed by SM Distribution, 16- 
18 Trinity Gardens, London SW9 
England.) 

Between the Radio Shack "rumors" and 
the announcement from Dragon Data, it 
appears that at least something 
similar to a Color Computer, as we 
know it, will be around for a while. 
Let me add that Radio Shacks history 
leads one to believe that any new 
"Color Computer" will at least have 
some compatibility with the Color 
Computer that we now know, and that 
they will NOT drop ALL SUPPORT for it 
(they are still providing some support 
for the Model I) . 

Since it appears that there will be 
something to build a magazine around 
tor the next Cew years, what can Color 
Micro Journal accomplish that is not 
already being covered by other 
magazines? For starters, our 
connection with "GS 1 Micro Journal 
gives us an edge in providing 
information about the new Operating 
Systems that will be available for the 
Color Computer and Dragon Systems; 
FLEX (which has been running on the 
Color Computer for a couple of years 
now, and is the Operating System that 
has a MULTITUDE of readily available 
Software including major Data Base 
Management Systems, Business 
Programs, Word Processors, 
Programming Languages, etc.), OS-9 (a 
Multi-Tasking Operating System similar 
to UNIX), and possibly UniFLEX (a 
Multi-User Multi-Tasking Operating 
System which Is a little more similar 
to UNIX) . We also feel that there is a 
need for a Magazine that will allow 
advertising at a rate that new 
producers of Color Computer products 
can afford; a need for a Magazine that 
has INFORMATION for new users as well 
as the "old pros"; a Magazine that 
helps YOU learn MORE about your 
computer, what is AVAILABLE for it, 
and HOW TO USE what IS available for 
it. The major thrust ot Color Micro 
Journal is toward USING your 
Computer. 

Color Micro Journal is a Magazine 
FOR Color Computer USERS 
BY Color Computer USERS! 

We, the staff of Color Micro Journal, 
need YOUR help in making this a 
Magazine for YOU. Believe it or not, 
what YOU are interested in is the same 
thing that several thousand OTHER 



Color Computer Users are interested 
in. The questions YOU \mtve are being 
asked by thousands of others* It is a 
well know fact that the majority of 
the GOOD Software is developed by a 
Personal Computer User that had a 
problem to solve, and did not have to 
solve it within a limited period of 
time to be able to put food on the 
table. If you have developed a 
Program to solve a problem, pass it 
on; it is just what some other Color 
Computer User needs. If you have 
developed a Hardware Modification, 
send it in. Trying to get the 
Computer turned on? Drop us a note; 
we'll publish it and you may be 
surprised at how many replies you will 
get, and how many different ways a 
computer can be turned on. Seriously, 
if you are stumped, yell for help! The 
Color Computer has been in the field 
long enough that the large majority of 
the problems have been solved by 
SOMEONE, conversely, if YOU have 
solved a problem, send that solution 
in; it will help a LOT of other users 
who have the same problem. 

The "Tabloid" Format of Color Micro 
Journal was chosen for several 
reasons. First, is drastically 
reduces the cost of printing a 
magazine, which we can pass on to the 
Readers and Advertisers. Second, it 
drastically reduces the lead time 
required for actually printing the 
magazine, providing the most up-to- 
date information to the reader. 
Third, it is easier to read than a 
■glossy" page. And, fourth, it is a 
"relaxed, informal" medium ot 
information transfer that we hope will 
be the hallmark of the Color Micro 
Journal Magazine. We hope to minimize 
OUR work by publishing your 
submissions just like we receive them. 
This helps YOU, the reader, in two 
ways; we need less staff, meaning 
lower magazine costs, and, more 
important, there Is MUCH LESS CHANCE 
FOR ERRORS in Programs, Articles, 
etc., that you read. As I said. Color 
Micro Journal is a Magazine FOR the 
Color Computer USERS BY the Color 
Computer USERS. All we are doing here 
at Computer Publishing inc. is 
providing YOU with a vehicle and 
central location for SHARING 
INFORMATION. The material YOU 
provide, and the questions YOU ask, 
determine WHAT goes into YOUR 
Magazine . 

OK; what format can we work with 
effectively? We can work with ANY type 
of ASCII Format - a DATA File on Color 
Computer Tape or Disk, a .TXT File in 
FLEX Format, etc. Of course, we can 
easily work with either a Tape or Disk 
BASIC Program, If you have a Word 
Processor and can send an ASCII File 
from it on either Tape or Disk, no 
problem. If not, then send any text 
(again, if you are also sending a BASIC 
Program, just send the Program in 
Binary Format on Tape or Disk), either 
Typed or Pr Inted (WITH A GOOD RIBBON) 
with a MAXIMUM of 40 Characters per 
Line (no more than 4.0 inches wide), 
single spaced, and we can take it from 
there. If you have a question, drop 
me a line. What kind of Programs and 
Articles are we looking for? ANYTHING 
relevant to the present or future 
"Color Computer" types of Computers; 
the Model 10 "Baby CoCo", the TRS-80C 
Color Computer, the DRAGON and its 
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ancestors, etc. Remember, these 
computers are being purchased by new 
owners every day, so what may seem 
like "old hat* to you may be just 
exactly what THEY need to know. 
Hopefully, there will be something for 
every one in each issue; from the 
basics to advanced Machine Language 
information, covering both Hardware 
and Software. Again, if it interests 
YOU, there are a lot of other people 
In the SAME boat. 

One of the most popular sections of 
the *68' Micro Journal over the years 
has been a section of the Magazine we 
call the "Bit Bucket". This section 
consists of letters, short programs, 
routines, etc., THAT ACCOMPLISH SOME 
TASK. We will install a section like 
the "Bit Bucket* in the Color Micro 
Journal, and will give you a minlmn of 
a 6 MONTH EXTENSION to your 
Subscription for the Color Micro 
Journal for any short program, 
routine, operating hint, hardware fix, 
or whatever, that we accept for 
publication [many of the subscribers 
to '68' Micro maintain their 
subscriptions in this manner) . Get on 
the band wagon and send in your 
"secrets* TOCftY! 

I hope you find some useful information 
in issue Number 1 of Color Micro 
Journal. Let us know what you like 
and dislike; the Magazine will be as 
good as YOU make It. 

Robert L, Nay 
Editor 



COMPUTER 

TAPES? 



*'hen I started learning about computer* 
in general and Co Co In particular It 
6**z.*& the Boat natural thing In the 
world to use cassette tapes and record- 
ers to store information. This likely 
had something to do with the fact that 
1 was doing a lot of cuatea cassette re 
cording and duplicating. And the truth 
la that I am still Intrigued by the use 
of such aiapls end fairly inexpensive 
systems with relatively powerful compu- 
ters ► 1 think even more could be done, 

tut, there are a few things that seen 
to get overlooked by sons folks whose 
only exposure to cassette way hawe been 
In ecitputer applications. 1*11 try to 
note some of the things that may be 
helpful to the non-audio user. 

One of the first things that caught ay 
eye was that programs were being devel- 
oped and sold to solve various problems 
that can occur when trying to make cop- 
ies of certain programs. * B * computer 
neophyte , I don*t pretend to understand 
Just what the problems are. I'm so new 
the warrantee hasn't even run out on my 
first computer » a CoCo, of course. But 
I do know that regardless of the nature 
or format of the save, almost any half 
decent cassette recorder with a patch 
cord or two from your nearest audio or 
electronics shop will copy, sound for 
sound, whatever is on your tape to or 
from another similar recorder. 
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y have to experiment with warious 
atlons of volume and tone - yes I 
one - controls. But, sooner or 
you will find a combination that 
After I get one to work I like 
ertment further to find the upper 
wer limits of usable settings and 
ttings that are in the middle of 
r.ge. Tour owners manual should 
ou how to record from other aach- 

On leas expensive ones the AUZ 
will often record from earphona 
aker Jacks. First, try copying 
or voice. If It sounds clean It 

work for computer tapes. 



Oh ye si Don't forget to write down the 
combination that works, when yon find 
it. 

I mentioned that tone controls nigh** 
make a difference in your success. Of 
course, sone of you don't even have any 
such controls. But, Just because you 
can't change your bass or treble, don't 
give up yet. Although the presence of 
tone control* often Indicates s bettor 
quality recorder this is not always so. 
Even If your recorder la not a better 
quality machine chances are that you 
can still find a combination that will 
work. As a matter of fact, you may 
benefit from the considerable differ- 
ences sometimes found between one tap* 
and another. Some tapes are obviously 
more bass or treble than others, given 
the same recording conditions, usually 
a treble sounding tape will give a wood 
boost to the upper voltage. On really 
good systems it us usually better not 
to use Colby and other equalisations. 

Speaking of differences in tapes, I 
find the idea of paying near three dol- 
lars for a "computer tape" spelling. 
There are definitely different quality 
tapes. But, the tape that can't handle 
the frequency requirements of cassette 
I/O probably hasn't been made. And 
other requirements have really little 
to do with computer*. I am referring 
to requirements like leads rites tapes. 

Personally, I almost prefer having s 
leader tape over a leaderless one. 
With a leader tape 1 can atart the 
recorder (in record mode) on the leader 
and as it sweep* onto the tap* I am 
sure It has erased anything that may 
have been near the beginning. Simil- 
arly, I continue on record a short dis- 
tance beyond the end of a save. This 
removes any unhealthy spike* from the 
area. Also, if I want to locate that 
segment by listening the apace will 
both identify the end/start and leav* 
room for hand qu*ing. 

My next point applies to recording of 
any kind. Regardless of the name on 
the package, if the tap* ha* a dull, 
rough finish on the oxide side (the 

side feeing out In a esesette) it»a Hire 
running fine sandpaper over one spot on 
your recorder. It will wear a groove in 
head or head* much earlier than normal. 
Whan 1 am buying tap* the very first 
tning I look for 1* this aaooth shiny 
finish on the aide you normally see in 
the cassettes ports. Not Just on the 
back which is sloost always shiny. 
Finding a good finish is usually a pro- 
blew with "dim* store" packs. I don't 
even look at them any more. 

Where can you buy economical tapes that 
are worth having? Audio supply houses 
all over are advertising tapes. If yam 
can get a look at them you may do quit* 
well at as low as fifty cents each. If 
you have a club or several friends you 
can buy In boxes of a hundred and get 
auch price*. Ask what different taps* 
they have and keep an eye open for the 
smooth finish. Try S couple before you 
buy s lot. Sometimes you can get low 
level tapes that don't put out the same 
volume as others. A*k about this too. 
Also, you will find that usually cas- 
settes put together with five screw* 
are pretty sechanical quality and lsss 
apt to jam. 

From tiae to time I see a suggestion 
in an article that you record nothing 
over the space you expect to use then 
go back and do the save. If your erase 
head lan't too effective this can bs 
s real help. If you have s record vol- 
ume control aet it at zero walls doing 
tnia* Since this takes a lot of time 
and since I have a good bulk eraser I 
always run ay tapes ov*r It before I use 
them. But. good erasers axe expensive 
- from about seventy five dollars up. 
Host of the cheaper permenant magnet 
type erasers are a little marginal for 
fidelity sound but they should be a 
big help at computer frequencies. 

Since there are so many types, kinds, 
brands etc. of cassette recorder* it 
is impossible to be specific in an 
article like this. But, by and large, 
if a recorder sounds good it will do 
well with cumputer work - given the 
proper connect lone. Noisy scratchy 
sounding machines will bs a pain. 
Happy recording. 



Jim La Lone 
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BASIC 

Users Notes 

CoCo VARPTR for Non Extended Systems 

As those of you who have non-extended 
CoCo's know, there are many nice 
additions to the CoCo Basic, that 
extended basic gives you. One ot 
these nice additions is the VARPTR 
command. This command, returns the 
memory location where a given variable 
is stored. This is useful in a variety 
of ways. For instance, if you are 
doing a sort, you can look up the 
string variables in memory, and 
instead of physically moving the 
strings around, you can simply change 
the pointers to where tne strings are 
stored. This avoids garbage 
collection delays as well as makes 
your program run faster. An other 
use for the command is to access the 
floating point variables, for direct 
manipulation in order to do more 
efficient floating point operations, 
such as multiply and divide 
instructions. 

The use of varptr, allows all kinds of 
neat things to be accomplished. Well, 
now that we know a little about the 
possibilities, let's delve into just 
how we can accomplish this magic. As 
some of you may remember from my first 
article, there exists a subroutine in 
the CoCo roms, that will find a 
variable. The routine is called 
FNDVAR, and it looks up a variable in 
the symbol table, and returns it's 
value. It it is not tnece, it will 

allocate it. Now that last point 
bears repeating, if it is not there, it 
wil be allocated. Bingo, we can now 
create basic variables from within a 
machine code program, directly, and 
without basics* being the wiser. We 
can use this to assign values to 
strings and things. There are two 
ways to set up varptr. One uses a 
exec or usr call, and the other, 
doesn*t need any machine code. 

Since I am particularly fond of machine 
code, let's attack the first one. It 
will be reasonable, to assume that we 
can h^e two basic variables Cor our 
exclusive use, so we will use VA 
(variable address) and VN$, (variable 
name string). To use the routine, we 
first set VN$ equal to the variable 
that we need the address of, and then 
call our machine language program. 
The program will then return the value 
of the location of the variable in the 
variable VA. We will not bother to 
lookup elements in an array at tnis 
time, we will work on that later as 
your understanding of how basic works 
improves. Listing 3 is a simple basic 
program that will load our code into 
memory, and get it ready for 
execution. Listing 2 is tne actual 
machine code program that does the 
work. We will be using a new rom call 
this time. It is called STORFP, and it 
transfers the primary floating point 
accumulator to the memory address 
that is pointed to by the X register. 
This will be used to set the value 
back into the basic variable VA, 

In a previous issue of 68 Micro 
Journal in an article on using USR, we 
touched on the other routines that we 
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TEN MOST-ASKED QUESTIONS 

a^ut DYNACALC 

THE ELECTRONIC SPREAD-SHEET FOR 6809 COMPUTERS 



1, what Is an electronic spread-sheet, anyway? 
Business people use spread-sheets to organize 
columns and rows of figures. DYNACALC simulates 
the operation of a spread-sheet without the mess 
of paper ana pencil Of course, corrections and 
changes are a snap, changing any entered value 
cause* the whole spreadsheet to be re-calculated 
based on the new constants. This means that you 
can play, what if? to your hearts content. 

2. is dynacalc Just for accountants, then? 

Not at all. DYNACALC can be used for just about any 
type of job. Not only numbers, but alphanumeric 
messages can be handled. Engineers and other 
technical users will love DYNACALC s sixteen-digit 
math and built-in scientific functions, you can build 
worksheets as large as 256 columns or 256 rows. 
There s even a built-in sort command, so you can 
use DYNACALC to manage small data bases — up to 
256 records. 

S. What Will DYNACALC do for ME? 

That s a good question. Basically the answer is that 
DYNACALC will let your computer do just about 
anything you can imagine. Ask your friends who 
have VisiCalc™, or a similar program, just how 
useful an electronic spread-sheet program can be 
for all types of household, business, engineering, 
and scientific applications. Typical uses include 
financial planning and budgeting, sales records, 
bills of material, depreciation schedules, student 
grade records, job costing, income tax preparation, 
checkbook balancing, parts inventories, and payroll. 
But there is no limit to what YOU can do with 
DYNACALC. 

4. Do I have to learn computer programming? 

NO! DYNACALC is designed to be used by non- 
programmers, but even a PhD. in computer 
Science can understand it. Even experienced 
programmers can get jobs done many times 
faster with dynacalc compared to conventional 
programming. Built-in help messages are provided 
for quick reference to operating instructions, 

5. do I have to modify my system to use DYNACALC? 
Nope. DYNACALC uses any standard 6809 conf ig- 
uration, so you don t have to spend money on 
another CPU board or waste time learning another 
operating system. 

Order your DYNACALC today! 



Foreign Dealers: 

Australia & Southeast Asia: order from Paris Radio Elec 
tronics, 161 Bunnerong Road (PO Box 380) Kingsford, 
2032 NSW Australia Telephone: 02-344 91 11 

united Kingdom: order from Compusense. Ltd.. PO 
BOX 169, London N13 4HT, Telephone: 01 882 0681. 

Scandinavia: order from Swedish Electronics hk ab, 
Murargatan 25-25, Uppsala S-754 37 Sweden. Tele- 
phone: 18-25-30-00 



6. win dynacalc read my existing data files? 
you bet! DYNACALC has a beautifully simple 
method of reading and writing data files, so you 
can communicate both ways with other programs 
on your system, such as the Text Editor. Text 
processor, sort /Merge, stylograph™ word 
processor, rms™ data base system, or other 
programs written in basic, c, pascal, Fortran, and 
so on. 

7. HOW fast IS DYNACALC? 

very. Except for a few seldom-used commands, 
dynacalc is memory-resident, so there is little disk 
I/O to slow things down. The whole data array 
(worksheet) is in memory, so access to any point is 
instantaneous, dynacalc is 100% 6809 machine 
code for blistering speed, 

8. is there a version of DYNACALC for MY system? 
Probably. You need a 6809 computer (32k 
minimum) with flex™, uniFLEX™, or os-9™ 
operating system. You also need a decent crt 
terminal, one with at least 80 characters per line, 
and direct cursor addressing, if your terminal isnt 
smart enough for DYNACALC, you probably need a 
new one anyway. The uniFLEX and OS-9 versions of 
dynacalc allow you to mix different brands of 
terminal on the same system, There's also a special 
version of DYNACALCfor Color, <&mmte?%%QMiRR8& 
with flex (Frank Hogg or Data-Comp versions). 

9. How much does DYNACALC cost? 

The FLEX versions are just $200 per copy; uniFLEX 
version $395; os-9 version (works with level one or 
LEVEL twoi S250. Orders outside North America add 
$7 per copy for postage. We encourage dealers to 
handle dynacalc, since its a product that sells 
instantly upon demonstration. Call or write on your 
company letterhead for more information. 

10. where do I order dynacalc? 

See your local dynacalc dealer, or order directly 
from esc at the address below, we accept 
telephone orders from 10 am to 6 pm, Monday 
through Friday. Call us at 314-576-5020. Your visa or 
MasterCard is welcome. Please specify diskette size 
for flex or OS-9 versions. Software serial number is 
required for the uniFLEX version. 



Computer Systems center 

13461 Olive Blvd. 

Chesterfield, MO 63017 

(314) 576-5020 




uniFLEX software prices include maintenance for 
the first year. 

dynacalc is a trademark of 
Computer Systems Center 

VKlCalt Is a trademark of vistcorp. 

Stylograph 1$ 3 trademark of Great Plains Computer Co 

RMS Is a trademark of Washington computer Services 

FLEX and UniFLEX are trademarks of TSC 

OS-9 Is a trademark of Mlcroware and Motorola 
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will use. For those of you who are 
just coming on-board, we will give you 
a quick review ot those routines. 
Routine #1 is FLOATD. This routine 
will take a two byte value held in the 
D accumulator (a&b), and convert it to 
a floating point value. Routine #2 is 
the one that forms the guts of our 
program. It is called FNDVAR. You 
set up for the call to this routine, in 
the following manner. You set the 
name of the variable desired into 
locations $37, $38, and then JSR 
SB38F. The location of the variable 
returns In locations $39 & $3A. 
Variables are stored in memory, as two 
byte names. In the case of a numeric 
variable, the two bytes are stored 
just as they are given, that is in 
ascii without the high bit set. 
Strings are referenced on the other 
hand, by setting the high bit on the 
second byte of the string name. I 
think that the listings are commented 
well enough for most of you to follow, 
so lets* get busy, and look them over. 

Listing 1, is a 94 byte machine code 
program, that does the magic that we 
need done. Basically it locates the 
variable VN$, then extracts the name. 
It then looks that name up, and saves 
the address. After locating the 
variable asked for, it looks up the 
variable va, and then gets the 
location of the variable and converts 
it to floating point and shoves it into 
the variable VA. The STORFP routine 
resides at $BC35, and requires that 
the X register be pointing to the 
memory location to store it. 

Listing 2. is a simple way to 
accomplish almost the sane result, the 
only, difference being, that if you 
reassign the located variable to a 
previously defined variable, it changed 
the location of the requested variable 
in the symbol table. One might force 
it to work, it he experimented with it 
long enough to discover just how the 
variables are shifted around, and 
found a way to compute the offset 
required in order to make It work. 
Suffice it to say, that as long as you 
are printing the result, whether from 
local mode, or from a program, the 
correct results will be obtained. 

Listing 3. is the basic loader for the 
machine code program. Be sure and 
type at least 96 **s, and do not leave 
any space between the line number and 
the REM statement. You should then 
goto Line 20. When it ends, your 
machine code will be stuffed in the 
REM statement, and lines 20 onward may 
be deleted, and the routine used as 
needed. As previously mentioned in 
the first article, (published in 68 
Micro Journal), this technique of 
embedding machine code inside of a REM 
statement is extremely handy. You can 
easily embed up to 250 or so bytes of 
code in a long remark statement, and 
If you are handy with a monitor, you 
can embed even longer programs. 
There are a couple of things to watch 
out for however. Since Microsoft uses 
a to end a line, your code CANNOT 
have a in it, as the Interpreter will 
think that it is the end of a line, and 
set it's pointers up during a list, 
cleanly clobbering your code. You will 
note that there is a comment in the 
assembly listing about this. 

Woody Baker 











Listing 1. 










ORG 


$0D2C 


0D2F 


CC 56 CE 


START 


LDD 


IS56CE 


0D2F 


DD 37 






STD 


$37 


0D31 


BD B3 


8F 




JSR 


$B38F 


0D34 


9E 39 






LDX 


$39 


0D36 


E6 84 






LDB 


0,X 


0D38 


CI 03 






CMPB 


t03 


0D3A 


22 4B 






she 


ERROR 


0D3C 


AE 02 






LDX 


2,X 


0D3E 


CI 03 






CMPB 


13 


0D40 


26 0C 






BNE 


NOTHRE 


0D42 


A6 02 




THREE 


LDA 


2,X 


0D44 


81 24 






CMPA 


#$24 


0D46 


26 3F 






BNE 


ERROR 


0D48 


EC 84 






LDD 


0,X 


0D4A 


CA 80 






ORB 


#$80 


0D4C 


20 19 






BRA 


GO 


0D4C 


CI 02 




NOTHRE 


CMPB 


#2 


0D50 


26 0C 






BNE 


ONE 


0D52 


A6 01 






LDA 


1,X 


0D54 


81 24 






CMPA 


#$24 


0D56 


26 0D 






BNE 


NOSTRG 


0D58 


C6 80 




STRING 


LDB 


#$80 


0D5A 


A6 84 




NXT 


LDA 


0,X 


0D5C 


20 09 






BRA 


GO 


0D5E 


C6 01 




ONE 


LDB 


#1 


0D60 


5A 






DECS 




0D61 


A6 84 






LDA 


0,X 


0D63 


20 02 






BRA 


GO 


0D65 


EC 84 




NOSTRG 


LDD 


0,X 


0D67 


DD 37 




GO 


STD 


$37 


0D69 


3D B3 


8F 




JSR 


$B38F 


0D6C 


9E 39 






LDX 


$39 


0D6E 


34 10 






PSHS 


X 


0070 


CC 56 


41 




LDO 


#$5641 


0D73 


DD 37 






STD 


$37 


0D7S 


3D B3 


8F 




JSR 


$B38F 


0D78 


35 06 






PULS 


D 


0D7A 


9E 39 






LDX 


$39 


0D7C 


34 10 






PSHS 


X 


0D7E 


BD B4 


F4 




JSR 


$B4F4 


0D81 


35 10 






PULS 


X 


0D83 


BD BC 


35 




JSR 


SBC35 


0D86 


39 






RTS 




0D67 


7E B7 


06 


ERROR 


JMP 


$8706 




LISTING 2 







Doesn't matter, is pic code 

VN$. .name of where name needed Is 

Set up for FNDVAR 

Go look up variable. 

Point to the name 

Pick up length of string 

If >3, then invalid name, 

.,so issue a function call error 

Pickup pointer the string. 

See if 2 character name; e.g. Al$. . 

Nope, just single letter ordinary. 

Pick up 3rd character of name 

Check for string 

If 3 and not string, then error 

Get name 

Set string 

Skip the zero operation 

If not 1 character then 

..see if second character is string 



Set up a string 

Get variable name and go find it 

Make a single character 

To eleminate 0's. we need a here 

Get the variable name 

Continue 

Get chareter name 

Set up for first, find it 

..and locate the variable. 

Get address. 

Save reqested variable address 

VA,,, .where to put it. 

Set up to find VA 

Look it up 

Get address back. 

Get address of VA 

Save it 

FLOATD,, .convert to tp. 

Get variable address back. 

Move tp accuml to memory 



$B706 Issue a function call error 



2 VA-0:VN$="VA":A=0!REM A= TEST 
VARIABLE, VA AND VN$ USED FOR 

3 REM THE SECOND METHOD. VN SHO 
ULD BE SET TO THE NAME OF THE 

4 REM VARIABLE TO LOOK FOR, 

5 REM LINE 20 IS AN EXAMPLE OF H 
OW TO DO VARPTR FROM WITHIN 

6 REM BASIC. ONE COULD DEFINE A 
FUNCTION TO RETURN THE 

7 REM VALUE. THE 65 IS "A", AND 
THE IS BECAUSE IT IS ONLY 

8 REM A SINGLE VARIABLE. ADDING 
128 TO THE ASCII VALUE OF 

9 REM THE SECOND CHARACTER OF TH 
E NAME, WILL LOCATE STRINGS, 

10 REM THE SECOND CHARACTER OF T 
HE NAME MUST BE POKED INTO 

11 REM LOCATION 56. LINES 30-50 
SHOW ANOTHER WAY OF LOOKING 

12 REM FOR A VARIABLE NAME. IT 
REQUIRES THAT THE NAME OF THE 

13 REM VARIABLE TO FIND BE HELD 
IN VN$, THE ADDRESS WILL BE 

14 REM RETURNED IN VA. 

19 REM 

20 POKE 55,65:POKE56,0:EXEC 4596 
7: PRINT PEEK£57)*2S6+PEEK(58);EN 
D 

29 REM.. ..LOOK UP VA 

30 A=ASC(LEFT${VN$,l)):POKE55,A 

31 A=ASC(MID$(VN$,2,l)):POKE56,A 
:REM IF STRING THEN MUST HAVE 

32 EXEC 45967: REM THE HIGH BIT 
SET...VN$»"A"+CHR$(128): WILL LO 
OK 

34 PRINT PEEK{57)*256+PEEK(58):R 
EM ONLY CAN PRINT IT 
50 PRINT VARPTR{VA):Ra* FOR EXTE 
NDED BASIC CHECK 



LISTING 3, 

|fl fiEM** ***************** ******* 

******************************** 

******************************** 

****************** 

11 A=lrVA=0:VN$="A"+CHR$(0) 

15 EXEC (PEEK(25)*256*PEEK(26)+5 
) : PRINT VA 

16 PRINT VARPTR (A) : REM AS A CHEC 
K FOR EXTENDED BASIC 

17 END 

20 I=PEEK(25)*256+PEEK(26)+5:REM 
INSTALL CODE... DELETE 20 ONWARD 
22 FOR J=I TO 1+93 iREADA: POKE J, 
A:NEXTJ 

25 DATA 204,86,206,221,55,189,17 
9,143,158,57,230,132,193,3,34,75 
,174 

26 DATA 2,193,3,38,12,166,2,129, 
36,38,63,236,132,202,128,32,25,1 
93,2 

27 DATA 38,12,166,1,129,36,38,13 
,198,128,166,132,32,9,198,1,90 

28 DATA 166,132,32,2,236,132,221 
,55,189,179,143,158,57,52,16,204 

29 DATA 86,65,221,55,189,179,143 
,53,6,158,57,52,16,189,180,244,5 
3,16 

30 DATA 189,188,53,57,126,183,6 
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WHY 

COCO 

Can't READ 



INTRODUCTION 

As a software developer, I am 
sensitive to new systems, disk drives, 
disk controllers, software, and other 
parameters which affect the market in 
which I sell my products. Users whose 
systems cannot read the diskettes 
that I send are understandably upset 
and call or write me quickly about 
such problems. Luckily, such problems 
have been rare. 

In the past, I have avoided most media 
interchange related problems by 
shipping 5.25" diskettes in a single 
sided single density 35 track r FLEX or 
0S9 format* and 8" diskettes in a 
single sided single or double density, 
FLEX, UNIFLEX or 0S9 format, I can 
make the diskettes flippies by 
punching extra Index and write 
protect holes in the covers. This has 
proven generally very reliable over 
several years and over many new 
products, including several otherwise 
incompatible systems, such as CMS, 
Glmijc, Motorola, Radio Shack, Smoke 
Signal, Southwest Tech, etc. 

Recently, I have had a rash of 
complaints from COCO FLEX users who 
could not read the diskettes I had 

SQHt LHetrii, fiEtsf ^QHDUlCdUOFt Wlfcft 

several of them and attar trying 
several experiments on my own COCO, I 
now can ship diskettes to COCO users 
and be reasonably certain that they 
will be able to read the diskettes. 
This discussion attempts to share 
some of this information about the 
COCO disk problems and solutions. 

HARDWARE 

The disk-related hardware of the COCO 
is composed of the following major 
components: 

one to four 5*25* disk drives 

one disk controller cable 

one to four disk drive power 

supplies 
one or more 5.25" diskettes 
one disk controller 

The Radio Shack supplied hardware for 
the COCO follows that company's 
general philosophy of providing minimal 
(or almost minimal) hardware at fairly 
high prices, and partially supporting 
this by designing it just incompatibly 
enough to make competition initially 
somewhat difficult. 

DISK DRIVES 

The Radio Shack supplied disk drives 
have the following attributes, when 
compared to the competitors' disk 
drives: 

single or double density 
35 tracks, not 40 or 80 

single-sided, not double-sided 
30 msec step rate, not 6 or 12 
no head load solenoid 
minimum filtering of, read signal 

Color Micro Journal 



These specifications are for an almost 
minimal unit. The only item above a 
minimal disk drive is the capability of 
recording in double density mode, 
which some very early drives (initial 
SA400 production) could not do. The 
Radio Shack supplied software uses 
double density exclusively, although 
the drives are capable of single 
density. 

The provision of only 35 tracks, 
rather than 40 or 80, causes no 
direct problems other than the lack of 
storage, when using the Radio Shack 
supplied software, since it supports 
only 35 tracks and cannot use more, 
even if the drives actually nave more 
than 35 tracks. It can cause media 
interchangeability problems if a Radio 
Shack supplied drive is used with FLEX 
or other software supporting more 
tracks on the disk drives. These can 
be minimized by interchanging 
diskettes with data restricted to the 
first 35 tracks on the diskette; 
however, the receiver of a diskette 
sometimes has no control over the 
format placed on the diskette by the 
sender. 

The restriction to single sided, 
rather than double sided, recording 
format causes essentially the same 
problems as does the restriction to 
35 tracks. The loss of capacity is 
much greater in this case, however, 
since adding another head to the drive 
doubles its capacity, and adding 5 
tracks only increases its capacity by 
one seventh. The diskettes may be 
safely made flippies, doubling the 
offline, although not online, capacity 

The slowness of the head step rate (30 
milliseconds) causes no problems 
except for materially slowing disk 
operations, especially those involving 
heavy use of random file access. Many 
drives become very noisy When stepping 
at this slow a rate, but seem to work 
properly. 

The lack of a head load solenoid 
implies that the drive head is loaded 
whenever a diskette is in a drive with 
the head closed. This will Increase 
media wear somewhat since all heads 
will be contacting the media whenever 
the motors are on, rather than only 
the head of a selected drive 
contacting the media. This also 
worsens the problems associated with 
turning power on and off when a 
diskette is in a drive, since the 
heads will be contacting the media, 
and not retracted. The Radio Shack 
software provides no head load 
settling time, since the Radio Shack 
supplied drives need no such delays. 
However, more sophisticated disk 
drives require head load delay to 
prevent occasional problems, 
especially when writing, due to initial 
bouncing of the head on the media. 
FLEX and other non Radio Shack 
supplied software provide head load 
delays, anticipating the use of drives 
with head load solenoids. If Radio 
Shack supplied software will be used 
to support a system with such drives, 
the jumpers on the drives should be 
selected in the HM (head load when 
motor on) mode, not in the HS (head 
load when selected) mode, to help 
prevent disk write errors and to 
reduce the number of read and write 
retries. 



The minimal filtering on the disk drive 
boards will cause the number of read 
and write retries and unreadable 
sectors on disk to be larger than they 
would have been otherwise. Other 
drives provide one or more additional 
levels of analog and digital filtering 
on the drive boards, increasing the 
signal to noise ratio. A digital 
filter may be added to the disk 
controller board to compensate 
somewhat for the lack of filtering on 
the disk drive boards; this is 
described later. 

DRIVE CABLE 

The Radio Shack supplied cable is not 
wired in a one to one basis. The 
drive 4 select line is in a 
nonstandard position on the cable. 
However, this cable may be used with 
non Radio Shack drives or standard 
cables may be used with Radio Shack or 
non Radio Shack drives by simple cuts 
and jumpers on the drive boards or on 
the disk controller board. For 
instance. If drive 4 select is being 
used for side select by non Radio 
Shack software {such as FLEX), but 
fewer than four drives are attached to 
the cable, the correct side select 
line may simply be jumpered to the 
drive 4 select line, either on one of 
the drive boards or on the disk 
controller board. 

POWER SUPPLIES 

The Radio Shack supplied disk drive 
power supplies are marginal, in terms 
of percent ripple, dip, and spike 
measures. They are not alone, 
h>.wsvot| many ot th» maii-or4ar rJink 
drive boxes with power supplies (often 
costing $70 to $100) suffer from the 
same problems. There should be less 
than 1% ripple, dip, and spike 
variation in the +5 volt supply to each 
drive. The +12 volt supply is less 
critical but should not vary by more 
than 51 during normal operation. 

Many such power supplies suffer from 
false economy in terms of amount of 
capacitance provided for gross 
regulation, allowing both voltages to 
dip during motor power-up periods. 
Several supplies reviewed had less 
than 5000 MFd capacitance on each of 
the voltages. Substantially 
increasing this amount (to around 
2 0,0 00 MFd each) should improve 
regulation substantially, if the 
transformer is rated highly enough. 
Each drive should be assumed to 
require approximately 1 ampere at +5 
volts and 3 amperes at +12 volts 
during motor power-up, but only 1 
ampere during normal motor speed 
conditions. Thus, power supplies 
providing only 1 ampere at +12 volts 
may be used, but only with large 
capacitors to provide a source of the 
excess +12 volt current during motor 
power-up periods. The worst case 
occurs if the +5 volt supply is derived 
from the +12 volt supply, which many 
are, since the power-on transients 
may then also affect the +5 volt logic 
on the board. 

Adding fuses, appropriately rated 
MOVs, and reverse diodes on the DC 
supply lines would be an inexpensive 
manner in which to try to protect the 
disk drives from power surges and 
power supply failures. Adding an MOV 
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The Original FLEX™ for Color Computers 



■ Upgrade lo 64 K 

• RS lo FLEX, FLEX to RS file transfer ability 

• Create your own character set 

• Automatic recognition of single or double density and single or 
doubled sided 

• All features available for either single or multiple drive systems 

• Sellable Disk Drive Seek Rates 

• Faster High Resolution Video Display with 5 different formats 

• Save RS Basic from RAM to Disk 

■ Move RS Basic to RAM 

■ Load and save function on FLEX disk 

• 24 Support Commands 12 wilh Source Text 

• External Terminal Program 

Languages Available 
Pascal, Fortran, RS Basic, RS Assembler. TSC Basic, TSC Assemb- 
ler, Relocating Assembler. Macro Assembler. Mumps 

11 you are rued ol playing gao»eso^ yi>w TH5 80C Color Compute' or find thai vou are 
namjicaccierJ by Hie limitations ol 'He HS BASIC m ir\irg ic wire a Program ira: u II a m* yamo 
actually USE trie Co** Compulei as a COMPUTER YOU ARE RE AO"V TO MOVE UP TO THE 
FLEX9 Operating System. II you *ar>l to have REAL PROGRAMMING POWER using * 
E»riemeiyPoweriui Business BASC PASCALS C Compilers a luii-tiiown Mac r o Assem&ie' 
win a L'Cf ary capability so you are not cortfmiXMSly rwivenlinf) the wheel VOU ARE READY 
TO MOVE UP TO THE FLEX® Ope-al nq System ll yflu wOuW li«e 10 we •' YOU PEAL IV 
COULD USE A COMPUTER IN VOUR BUSINESS 0' u- 'i.-nte you" Ccuwp "■■ Stan 

paving it s own wav py cfrjing scne ComDuw Won* '01 the mil ioflS ! ■ ■ .1 Di s nesses 

a'Ountf yog g^cri as Wcctorocessing Payroll Accounting Inventory e-lt |(n»n VOU ARE 
READVTOMOVEUPTQTHEFLEX9 Opprahng System Ho*" , ''DATA-COMPhflsihe*flv' 

DATA-COMP s FLEX9 Conveiyon toi i"a TRS-60C Co«r Compuie' was aesiqnen lo' l"B 
SERIOUS COMPUTER USER: with tealures 'iM> qreaHv ncieswd Display Screens W TH 
LO*er Cast LAtMW SO you can put a FUIL Menu or- ONE &cr«Pi it «.er- SEVERAL Par,-* 
graphs al the same l>me -niirh leatures line piov«dmg a FULL KeyOQi'O SO you ''due FULL 
ConiroiOlyOu' Computer ANO-l 5 Programs NATURALLY without needing a chart ro see rt r i,it 
Kis L :-'.: -i ill :.■" wil givfi yOu w>l,V ' r ! :: *i|h USER ORlENTE D klOCtic : ' 1 ' ' - 1 ' i'-i-'! 
the Operating System natural li«e haviriq fN? Compute' AU'OMATlCALLY Determine wriat 
type of Dish 15 beinq used in wnai type Of Do* dive and wording accordingly ra!i^er thai you 
have to speedy each and every tn-.nq toi n or i*e navnq the Computer worn with trie Printer you 
havF. dean uv rig; all along Ailhout you having ro tell the new Operating System what is theie etc 

^FLEX is a trademark of Technical Systems Consultants 



QATA-COMP lias everything you need to make your TRS-SDC Color Computer WORK 
101 YOU, from Parts and Pieces to Full, Ready To Use SYSTEMS. DATA-COMP designs 
tell*, aarvices. and SUPPORTS Computer SYSTEMS not just Software. CALL OATA- 
COMP TODAY to make your Computer WORK FOR YOU 1 

System Requirements 

FLEX9 Special General Version * Editor & Assembler |wh«h normally sell lor $50 Oo 

eat Si WOO 

F-MATE(RS) FL.EK9 Conveision Rout lor the RS Disk Controller 

when purchased with Special General FLEX9 Sys S49 95 

when purchased without the General FlE*9 Sys $SQ us 

Set ol Eight G4K RAH Chips w Mod instructions $59 95 

Color Computer with 64K RAW and ExT 8A$lC S399 9S 

SPECIAL SYSTEM PACKAGES 

64K Radio Shack COLOR COMPUTER. Radio Shack COLOR DISK CONTROLLER, a Disk 
Drive System. Special General Verston ol FLEX9 . F-MATE(RS) and a Boi of 1 Ci 
Double Density Diskettes a COMPLETE, ready lo run SYSTEM on your Color TV Set 

DISK DRIVE PACKAGES etc 

These Pacnaqies include the Radio Shac* DiS» Controller D'SK Drives with Prjwer Supply anp 
Cabinet and Disk Drive CaWe 

PAK mi 1 Smgie Sided Doutjej Density Sys 5489 IS 

PAR *2 2 Smgie Sided OouBte Oens.ly Syi SM9 95 

PAK «3 1 DOut>ie S-OKT DOuDie Density SyS S&69 94 

PAK «* 2 Double S-decl Douole Oensiry Sys S919 9S 

PAK »5 - 2 Qurr-e Thimme DOuBie SHJflO COuDie Density Sy$ 5^4995 



a M c. M PARTS AND PIECES 

Radm Shack r>s* Coniroaer 

I Smr/e Sided Double Density Disk Dime Tendon 

1 Double Sraefl LToutile Density Disk Drive Qume 

1 Qume Thmlme Double Sided Double Density 

Sc»eer> Clean Clears up VKieo Distortion On Your Color Computer 
Sioqle Drive Caomer with Po'/«er Supply 
Doutjle D'ive Cabinet witn Power Supply 
Single Duve D«bH Cable 'or RS Caniroiw 

DouTjle D-ive L'.'--. i.'.hL V '.: RS C '1'iini- 

Micro Tech Prods lie LOWER CASE ROM Adapts 
Rddo Shack BASIC Version l.t ROM 
riadtt Shack Fn^Oed Basic ROW 



Si 79 95 

524-3 [IS 
S349 9S 
S2T& 9S 

S39 9S 

S89 95 

5'C9 95 
$?*95 
53-1 95 
S74 95 
S34 9& 



TERM — AN External Terminal Driver is FREE with purchase of F-Mate 






For Ordering Call TOLL FREE 1 -800-338-6800 



LAST OF PRODUCTION!!! 
!! LIMITED QUANTITY !! 



SWTPC 821 2 & B21 2{W) 
Intelligent Terminals 

Data-Camp Has Bought the 

Remaining Supply of 
SWTPC 8212 CRT Terminals 



If You Need an 8212 

We Have Them 

in Stock! 




PRINTERS 

The Epson MX-80 
$425.00 

The Epson MXTOO 

$725.00 

MX-70 S355 00 MX-80 FT $575 00 

Verbatim Diskettes. 



$ SoFt S»c1al Uilfc* 
Hingis Sid* Single Density K '5 a* 
Smgla Sid* DouDl* rj«n«ny {3 75 sa 
Doubi* Sid« Double Density i* 42 e* 
PUjitic Storage bo- (? 00 «J 



e Son Sector uu«! 
Single S>de Sniqte Density 51 H •• 
Single S<«»e f>auo» D#n*ny u 10 ea 
Double Side Oe-ub** Density ** 7i •■ 
PlftSKC LiO'»r^ Bni 14.00 *■ 

Foreign Orders Add 10*. SurteCe- 20"» Air Man 



- 



EM-82 Video 
Terminal 

Emulates the 8200 Series f rom SWTPC 



Re9.^»9efr 
Special $079 




DATA-COMP 

P.O. Box 794 HIXSON, TN 37343 





Data-Corn p— South East Media & 68 Micro Journal Are Divisions of CPI 



For Ordering Call TOLL FREE 1-800-338-6800 
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Software 



For Ordering Call TOLL FREE 1-800-338-6800 

FLEX™ OS-9 ™ Color Computer 



For the Strlctty Cefac Camputer"Usors 
AVAILABLE HOW!!! 

Hoel Sl»rn* Electronic*— 

ntnoued by FBMtfm IMWI faith package ibiKXM to lie coxy computer' Tnis pactagers suppeetl on Tape, rt 
irstrudioiTsforiranslerTrigrttedisfcn'v^ *n." 

Samqrapnfc-a &Wof a provided ahinc. Writ' O000)e4 like Grapncs and Sound Commands, Pruter ConwnajndS. 
Auto Repeal and Control <eys etc. ir you ere intenmnn in Learning Forth, a Trace Feature ia prowled which is 
arsatiasbie ltyauo^aFORTHPro.lMpfli*ii9npfWfli^iCPUaU>vF^a"«»«^. F MlT4BkMiJ«V*«ri3' Cean 
Inlenuprl grow' the Base CapabrJrll** ol the tmplorrwrrlaSanl. Comb*ie IM package with Joh Bron t EXCELLENT 
to* "Staring FOflTH and you ww De ■ FORTH Espert balora you know rl land tiara a to! of fun doing ilfl 

■HI 

Finally Ihe barrier has been reanoved from 0S9 " to FLEX " tormalled disk!! Mow you can READ and WHITE k) a 

FLEX" diskette. 5 Of B inch, «wih 0-F. 

OF 15 anew and untqu* program, WHIW inBASICOB- tratpfrtrjmij metodowlng funtnons, and comes ajrnplete 

with source 

1 HEFOIWAT;TNsrr^uwtoimansadisklhalcanb«read^ 

2 FLEI 6 AS: This program does tie actual road or write luncfcon to the Special 0* OS* AIM it tias ihe dan formal 
aiM MR lOSSl commands Al selectable Irom a useHrajncJr menu. AH selection* art? interactive and comelele 
includna all neoeasary prompts H> Ifw oparaior. 

i Oifit This modulo imonu selected) allows ihe ask directory » be printed la ale saeen whan in BASICtM. 
FLEX users Can read, WHO and use the special disk as ant olhei FLEX do*, provided *w FLEX directory I* nor 
allowed 10 Continue beyond In** lorO |K» many 1MB), 

trq i , 

A COLOR COMPUTER TERMINAL DRIVER 

TERM '-i a new and long needed terTOnal dnver to* those color O3itipuleTufl«ra*h0ha»*de*«IOp«d5l»^n0 rrdai-d 
aasaaaaBeMJIIMTBIsMl aato M MsaM 

Thnk wfiid thai meaml No more 32or even &1 charade's pei line, Inat are so barred that you must guess, a* to what 

soma characters actuaty are Mo more squmhng 01 cusama. Sounds greaP Well TERM nets tni away Irom al that. 

TEHM is tatod Irom Ihe CoGo as any othor program You Itien type Ihe flETllflN' hey on Ihe CRT video torrrwial 

•uryboaid and TERM conhguras the CRT video tefrnnal » the proper baud ram and you are- Iron ol squirting and 

guessing! To relum to ale CoCo keyboard iGod lodoid'l. youslmoly lypa m tha command EXTERM Irom the CRT video 

lerrnrial keyboard. er«3 you arc oac* where vomi started from squills and all 

TERM furcuonslrorr Dota-Comc FLEX d'ecily and reo/jnos only I standard CRT wdea terminal |any el clwftpo *>» 

do| or a dalum lernimal eilher urorfcs just llr« The Irjrmn* 15 ccnrvenlod lo llic serial pod of *ie CoCo by a standard 

Cable and oomecWf TERM does MOT njnewn in Radio Shac* mcele (musl be FLEX). 

II youwanl tha luxury ol 80 cna lade's by 2* linos, or mom. dODejndeig oh IhftCRT kid BO«errh«ialuS«a,H#n TERM sa 

musl 

ONLr £t9.9S 

FREE wilh purchase ot F-Mate 

SPFLLB "Computer Dictionary" 

No rnofo Lot your lingers do Ihe wanting Ihroiigh Iha Uttanary ' while you are mpiiniQ Te«t with yojr lavorria Edrror 
or Word Process?'. SPELLB, *rrria.i by Can Famswonh ol PALU BEACH SOFTWARE, a mors Irar "anollicr 
Speltng ChecABi . il allows yOHl»"iOOl« up a word Irom wlhir. your EailO'O'WoraProoassor SO ihai you KNOW in 
ngm WHEN YOU TYPE IT N (It your Eraror supports ft melhuij Ol oaSfrnQ a Command 10 FLEX without nailing the 
PrOgiami *MTI ir« SPH.CMD Utility |»hen operaies in ins FLEX LriMly Space) Yes. a ALSO allows you to check and 
update IhvTeKlafler you aretinamnd alowigwilhaaowngyCWIOAOOWrtWOSiOlwDiaianary. Flag qjesoonaolB 
wordsmOwTedlorevalualionlaler V*w' awofdflcdnleiitlwlrjfecrianairijo'qrnrnqclr; SPELLB In-sichecksa 
■ Common YVord Ocnonary' Ihen Iras normal DMIonaiy. twi 'PBrepnail Word List' . and finally, any "Speclai Woid 
Li«l" you may have specrlied SPELLB aso 3lk)*S ine use ol Small Disk Storage systems 

F|,fX «nc' Con FLfM tirH.K 

"JUST" TftKl ForrrffltW-r 

JUS! . a "Te«t Formatter daralopad by Ron AnrJaraon. 0TOyMte9 numerous l»a1u»Wwt«*m*art a vaU 

to any FLEX Ucnrc Boriware Library. JUST is desioned lor tjrmaitng T«rt Output lor Do* Mains Prmfrirs arid prOndes 

many unique leatu'es: 

CKaowl n« ' ForrnalMrdT Tout to *ie Olsolay tor lormat analyss and change 

Oiapun ■* ■Fomkaitefl Ten 10 a Ten File lor use wah Iha auppfearj FPnHT CMD tor producing mjliipte copajs ol the 

TaH on the Pnraer INCLUOINO IMBEOOED PHINTFH COMUAHOS (•»» WBry UMrtW il Oth#f nm#s alto, ana 

WCrtl me price Of Ihe program try iteetlt 
Uaar Corrllgarable torafiaplina lo other pyinteiSICOnre* set up Hx Ep«on MX-Ww*Qra*traA|;iX0¥lOe*1o<uCt0 

inn Qy irnoerldeo ' Frailer Control Commands' such as flakes on and orf Botdteco on and oft ale. 

AuferilHHM' h^"«»WW U»« « Uwi«rt» tHtfMh prlMMi! It"» 

Includes rie nuimai sue wiiiai margin mutoTM. paragiaph. stjajrjo. TortKal ship laios. page tonglh. page iximuemrg. 

cantanng. lit |LaaAcatton. etc 
Use xtoirn anY Eolior 
Supplajd witn StrucOJrad Sourc* rwifsarufh PU9f. eisy <o «ae nt now o> fie program 

FL«».an»Ci*irFLCs Hn 



PROGRAMMERS iboth NEW end OLD-TIMERS) NOTE — 

The Powei and VeraaliHy & ihe 6809 CPLr fr« affeKhed r»e capataHtis* ol the od Staodird " FXr yafrrnar aj 
ftmcuxt and Procsdunas, and opened Ihe door tor tha "innovators' ol ■» Indijiitry to develop WCW and Kl ILR 
Software Oevwlopment Tooli WIHURUSH WCRO SYSTEMS rias sleppod forward warn taw (3) new Program* that 
Wis find a home on EVERY Pioorairrmers work bench. 

MACE A XMACE 9y Onham Tfott 

MACE is a combined Editor Assembler desioned to allow the Prograwmef to Enter. Edit, and AssemcXe Programs 

with a lldjJil— ■ ol anort. MACE n designed prmarty lc« Ihe EASY deveopmanl rt small to medium sized Assernbry 
Language orog/ams But larger programs can be developed using He "Spool" taVaaaaaaal The Eddor la slrnpirfled 

I irrri I ti.-i' -.1 aan| Da^rbfeweaVaaige) codei eacfi Op-Code provio>r>5 rnmil -r^Tory '.-■«-; i- -. !^ MACE - 
wwy forgiving', wnicn when combsied wdi Ihe Inleracsrve" operaikn, makes mis an EXCELLENT paccage lor w» 
Begirnng Programmer! 

■\EK e»4) to*H FLEX — (M JO 

PL/9 8y Grahain Trotl 

PL. 9 13 an ElWjt Curnprier TJeouooer all combined «llD ONE PACKAGE, which was devised specifically to aaow *» 
AsseniWyLariguage Programmer in* Best of Alt yvonds ' It allows a^ pvogr animef to use ' SmjctLrad Prapnjrnming 
TecfYiiflues" whSe working at He Asaamfry Language level m a lotaJty IMTERACTiVE P-ogram Oeveiopnwnt Cycst 
IjusS ik* working wtH-i BASIC: enter soma coda, try it. adit Iha coda try * again, etc.) The Single Pass Compw* 
supports tip 10 127 Character Symbols Vanatfe Types: Prwuers. Control Su-uCtufaS bull around the Procedure 
System. IF THEN ELSE BEGIN END, WHILE, REPEAT UNTIL atajchires r*..akyi(jw* Slack. A-, B-. and 
D-Ragasaer manculanon eic. The Editor. Assembler are ssnaar bo eie fttACE Program The TracapTJerjugger ■«. 
nnanuu towards me PLfl Socrca Program and prowjes Sngle Shopping. Broatpomting running a £p£Ctlied Lns 
Nuirbw Range, etc. Aim ali.ttM prowdes anaweellenlSaltware Deveiopmonl Tool lor uniting the power olfhe SSOQ 

HEX SKI COW FLEX - BiatDO 

C — By Ja me* McCo* h 

Finally, for Ihe 'Big Time Operator", or lor the beginner whocan "sea the lylure" and wena to become a part of rt, here 

a the EXCELLENT WWWUSH MICRO SYSTEMS C ComtHler'. The; is one ol THE C C4rno0er« for me FLEX 

CfcH^attirigi System. It can be used with norniaJ Assemblers for most Programming, or with the TSC Ftetocaing 

AsiemMer Unking Loader lor those lua Csoaoi" System Packeges 

CLE* and Coto'LEX-sas.iXI 




Irrtro-I 

AVAILABLE NOW!!! 

SWW ' 'C" Compllei: generMas o»1remely etacienl object code OuhSul ' oenehmBnta " etoee 10 I CaJHj 88000 «i a Bll 
Ooeraaons 1 5 nines faslar man a A MUE fflO when using a ZMHi 6699 System (Re. W. WUcts Journal. May 

net, c=» res. as* sarsoo 

uevies »•« ao 

Or* r*w marmnanc* 3100 DO 



LucldaU 

AVAILABLE NOWril 

PASCAL Language anfli P-Coda Compiler. Version 1 Designed especially far tVaco Computer Systems; Run-ome 
System checks available resource* mi each lass., allowing operation on even nsncnai compulnr systems. Based on 
ihcs proposed ISO Standard Al<ws linkage lo Assembler Code try maximum aosiDiiiry 

FUaanaCouFLEXS" 1-190 00 

flFJK tXSOO 

PASCAL VTILmES — flaqLam LUCIDATA Pascal Ver. 3. XREF — w« produce a Cross Refarence Listing otehy 
lest, aimed spealcsy towards Pascal SOJfC« INCLUDE — alow* Ihrj nclusion ol oaher Filea in a Sociroe Teal, hae 
unKnrtea nesting «UMB»lrtiB* Also allows Binary M»-»«iusicns PROFILER — produces an Indented Numbered 
"ftnKitDgram' oi a Pascal SoufosTesI FH» AJtoww^weiglriBoverMtSnjclijieonar^etrigra 
as to Bib integrity 0* the piogranii SuDCied Hi Soiree Code; requreS cotnpnalicri. 

RES w Color HE« - f an crop-sm S^^ ua 

COPYCAT — A«0W5 reading TSC Mn-FLcX SSB D0S«t> and Pigrtal ResoarchCPM Disks w^ile operalirig undei 
FLEX 1.0, FLEX 2.0. c FLE!(9 Owian $000 or BS09 Systems COPYCAT will noiperloirn Urates, but. between Ihe 
pru^iamard Ihe manual, y-nu stand a good chance of accompbshng a Iransle* kicludes Ublilies 10 List Qi'eCtQr*eS. 
CoOY Files, and convert Tout Files wtion required Also mcLiods a UfclHy fa' nveWgaiKiJ Physical CompalltMly 
problem^ Programs suppled hi Modular Source Coots w make it easier to sosve unusual problems 

«LEi(andCoior«tEi:v IMrio 
«.EI B (esno 

Wastch«*t*r Applied Business Systems 

AVAILABLE NOWN1 
XOMS Data Mlanogement SyMtm Pc4»bly one ol Ihe most powe»fal OMS'S aweileble This mtschine language 
Uiitf» i i » anient enough lo OP^'aieixi a 5' i^lgfr'JgdS'd'gK yet prowJesthn speed of M L and power lirrvtod only by 
the uaei a imagnation Suppovts Sequenaal. Hterarchicat and Random Access File Structures »nd has Virtual 
Mamory Cflpabl»tes far those Oiam Data Bases Easy to uso Engloh Language Command Structure. 

rex m con fiex simss 
CHESS 6809 

Ftaounos FLEX" ana Now Runs On Any Type Tarmru! 
Faeluras 

• Two dopier boards. 

• Four levels at pay. 

• PeW scoring system 
- Play tthite or was*. 

• Change o» set-up board* pece posaions 

• Fortetl move 

• Swau sides 

• Mama rruTvn and swap sides: 

• Chango skill level. 

• Stop 'Mote m 1-2-3-* rmyvos 

Sr9.9i Specify 5' or 6 oVsh. 
This al one Ot fie Wongesr CHESS programs running on any maocompuiw esirnatedi us» Rasng 11500 - 

DtETTRAC Forecailer 

A Del Planning and Analysts Program 
DIET TRAC Fortcasler is a prorjran thel plans a dasl in terms of either calories and percentage ol carbohydrates 
proteins and lata (C Put VI « grams ol CartxihydVato. Protein and FarltoodeMhay^ sis basic food 

cx'jp: I .■L"^ia0i9 bread, meat. cKsn rnsk. anja and latj lor a specific individual 

Ssk Age heiQirit Present yveigni t-rgme bi?n Actway Level and Basal Melanotic Rale lor wma TKividuiais are 
tmerl into account Ideal weight and sustairang cstorera tor arty weigei M me aoove Y«*vidijai are calculated When a 
weiohl goal is given {either gain or Icssl and a catohe plan -9 agreed upon between (he computer and *te irtvklldual . 
the number of days to reach Hie aieighl goal is Of otected The statinrji and ending rale ot wwghl loss is calculated and 
a daily caaandar snTi aadv dory s wewvie lor a 30-oay eertcd « pntned 

Aleic vF a*o« — Isb as 
uwJiEx vF ashTjn — la* os 

rr.rr*f«*ter Py*l»ma rrvneiiltante 

AVAILABLE NOW!!! 
The Po werful Super Steuiti Waaraaembter leu Ihe Dala-Comp Hogg, and SpacMal tJOkx Come. FLEX Syclams . 

Cott FLEX Obhu Cooa nrsy feo 00 
Csto FLEX » Sovos GoOb IS* » 

itonnai rtEX w Bovfca Qsoi Sat 00 

livflew n sau^eCdo* (inooe 

OttatweOA *irji » 

— AU Ciwip Sn Crmf Piowamt nm 0" mt Cow FlE» svawni: - 

Great Plain* Computer C*. 

AVAILABLE NOW!!! 

STVLOCRAPHlOtor fP* Oala-Conip and Hogg Color FLEX Systems Pu« screen display and editing |i e . whalyou 
see is what you ^el], suppo<t^ proportional pnYstora Operaies with the 51 » 2* screen*. 

BeECiaLOOLOflPUESSTnO 1195*1 
nrasiTio sasno 

UNCLES STVIO S3« 00 

FaatSPELi»WCreCKER:a*c™r5»ro^chanQri9lheTesl Fte.addrngwerdstoltiedicliotiary, etc TiOoD words 
m less »an 400 sectors (easey fits 5'i" cksfes with cither normal commands on il alsol 

FLEX Ony FLEX. OS * ii» no 

UMSIfS SIT* 00 

MAIL MERGE — greatly attends Iho power and Itonbtily ol STYlOSHAPH AaowsMuhole Test hies lobe prmterj 

out as one large document. Pravioes for merging irYormairvi iraoirwi T*it File diving priming l.-sucn as different rarries 
and addrossesi, etc 

rit» CaKr RFS. OS-a 11*5 00 

UNIFU* JiSSBJ 

MfFOMAG Data Bate Management System - An XSASiC-Based. Menu Driven DBMS vath RwiD-ln Audit 
Tracking. EWrematy Powerful Report i Format CapeJHMeB. e*. Tlva Tkne Pi oven OBMS wdl becoma the Work 
Horse' ol your Software "Stable ' 

ruxard CeWr PuDl IHSae 
ufliFiCx tats on 

Asc in Stock Acctt Rec.. Accts Payable A Gen Ledger — A lui Mown Accourrkng Package thai can be used 
logerfte' of at separate packages, provides Ihe IRS required Audi Tracaang ijXRASIC. based on Ihe 'Osborne 
Busness P>Dgrain8."r 

FLES «M1 Coler HIS STKOpHSIOC 

uanFUEt t3es.» obog 



** QUALITY SOFTWARE NEEDED ** 



Business Software for the 64K ^ 



T^tM^ 



Business software tor tne o^fi\ jg" vo ** 

COLOR COMPUTER %fifr$ 




Data Base Manager 



Part ! 
Part II 



Single Entry General Ledger 
Church Contribution System 
Balanced Billing System 



$99.00 
$9900 
$95.00 
S99.00 
$99.00 



[hniversaLVI 
\D ATA V 

A RESEARCH 



Integrated 
Business Software* 

Accounts Payable 

Accounts Receivable 

General Ledger 

Inventory 2 

Payroll 



» 

$295,00 

$295.00 
$295.00 
$295.00 
$295.00 



Depend On South East Media Make Your BACK-UP' On South East Media FREE DISKETTE With Each $50 Purchase 

- FL rx * . *«*^ or Techw . , Me™ r * SOUTH EAST MEDIA 

,gg* *. **"*"^ 5t!?** al s ^ ten,s Conwt«"'* For Ordering Call TOLL FREE 1 -800-338-6800 5900 Cassandra Smith Rd., Hixson, TN 37343 

OS* is ■ ItwieHT.t.rl. ol Mcrotvare » <61 g) ,343.45,}* 
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and bathtub filter capacitor across 
the 111 volt AC line would further 
protect the power supply and drives 
from power surges and power line 
induced interference. 

Insufficient regulation will probably 
cause nothing more than a larger than 
expected number of read and write 
retry operations, unless it is 
serious. The timing marks on the disk 
drive flywheel provide a quick means of 
checking for motor speed variations. 
Under a tlourescent lamp, the marks 
should appear almost stationary; if 
they do not, the cause should be 
Immediately determined and corrected. 

Main power spikes may be transmitted 
through inexpensive power supplies 
and destroy data on the track over 
which the head is placed* Placing 5 
volt MOV f s across the +5 volt 
regulated supplies may prevent some 
problems; however, the best solution 
is to remove the diskettes before 
turning power on or off. However, 
power outages may cause several 
problems due to the fact that the 
power switch for the drives may still 
be turned on when the power returns, 
and the power line will be very noisy 
when it is abruptly turned off and 
again when it is turned on. 

DISKETTES 

The Radio Shack supplied diskettes 
are adequate, though quite 
overpriced, for their use on the COCO. 
In the many hundreds of 8" and 5.25" 
diskettes I have sent to customers in 
recent years, problems have been 
almost unrelated to brand, i now utaa 
the least expensive, diskettes 
available {currently $1.29 each plus 
$0.12 per cover in hundreds 
quantities) and have fewer problems 
with them than with the premium 
diskettes previously used. The double 
track 5.25" drives supported by COCO 
FLEX may well require the higher 
quality diskettes, although this is 
probably more dependent upon the 
quality of the drives than upon the 
quality of the diskettes. 

DISK COWTROLLER 

The Radio Shack disk controller 
follows the Radio Shack tradition of 
using an almost minimal design. The 
board uses a western Digital 1793 Disk 
Formatter, which is very commonly used 
and supports double density 
operations, a WD 1691 Data Separator, 
which interfaces directly to the 1793, 
a WD 2143 Four Phase dock Generator, 
which interfaces directly to the 1691, 
and a 74LS629 VCO. This portion of 
tti? interface board Is taken 
essentially verbatim from the Western 
Digital 179X Applications manual on 
page 14. 

The primary additions to this Western 
Digital circuit Include pulse shaping 
of read and write signals, with the 
write pulse set at 450 nsec and read 
pulse set at 200 nsec, and the 
buffering of the output lines with 
open collector gates. The primary 
modification to this circuit concerns 
the fact that the TG43 (track greater 
than 43) output from the 1793 is not 
connected to the 1691; instead, the 
TG43 input to the 1691 is connected to 
a latch controlled by the software. 
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The Radio Shack software sets this 
input high when a drive is accessing a 
track number greater than 21 and low 
otherwise. This has no direct effect 
on read operations, but causes write 
pre-compensation during disk write 
operations. The usage of write pre~ 
comp in this manner is unusual. Most 
40 track 5.25* disk drives do not 
specify pre-comp at all in their 
design manuals. The supposition is 
that write pre-comp was added to 
attempt to alleviate some of the 
problems with reading causes by 
deficiencies in the disk controller 
board, as discussed below. 

The disk controller board provides an 
8K byte ROM which contains the disk 
drivers used by the Basic interpreter 
and logic supporting optional 6809E 
non maskable interrupt at the end of 
1793 commands plus 6809E halt during 
double-density data transfers to and 
from the 1793, along with drive 
selection, motor control, density 
control, and write pre-compensation 
control. 

The halt logic Is necessary to enable 
the 6809E to transfer data fast 
enough to or from the 1793 while in 
double density mode. When activated, 
it halts the 6809E whenever a 
reference is made to the 1793 data 
register, until the 1793 provides a 
drq (data request) output. The nmi 
logic is necessary to force the 6809E 
out of a (potentially) halted mode 
when the 1793 completes or aborts an 
operation, activating its INTRQ 
(interrupt request) output. Thus, a 
very tight loop may be established to 

i i sinafof Jata bu mr **«*» kht» 1701 d»ta 

register without checking the 1793 
status register or the number of 
bytes transferred. 

The disk controller board has the 
following memory map to the COCO: 

C000-DFFF 8K ROM containing 

disk drivers, etc. 
FF40 control register: 

bit usage 

7 nmi 

6 drive 3 select 

5 double density 

4 pre-comp 

3 motor 

2 drive 2 select 

1 drive 1 select 

drive select 

FF48 1793 command register 

FF49 1793 track register 

FF4A 1793 sector register 

FF4B 1793 data register 

The Radio Shack disk controller board 
does not provide any of the following 
hardware services provided by many 
other disk controllers: 

motor-on delay timer 
off -speed detector 
motor status sensor 
drive-ready status sensor 
motor-off delay timer 
head-load delay timer 
head-load status sensor 
additional filtering of raw read 

The motor~on delay timer provides a 
fixed delay, usually by holding the 
1793 ready line inactive, to allow time 
for the disk drive motor to start and 
to stabilize at the correct speed, 
before allowing the 1793 to attempt to 



read from or write to the disk drive* 
The Radio Shack software provides a 
one second delay to allow the drive 
time to start and stabilize. If this 
delay is not performed, the 1793 will 
attempt operations on a disk drive 
that is not ready to respond correctly 
and may abort an operation simply 
because the drive is not turning at 
the correct speed, causing 
unnecessary retry operations. 

The off-speed detector and motor 
status sensor are often provided in 
addition to or in place of the motor- 
on delay timer. An off -speed detector 
is usually implemented as a missing 
pulse detector which holds the 1793 
ready line inactive if the index sensor 
on the selected drive is not providing 
pulses at a rate very close to the 
proper interval. The motor status 
sensor allows the software to 
determine the current status of the 
motor-on line on the controller board, 
thus simplifying the housekeeping work 
of the disk driver software. 

The drive-ready sensor may be used 
only with a drive which implements the 
logic required to determine that it is 
turning at the proper speed, has a 
diskette installed, and is ready to 
receive or transmit data. It could 
thus replace the off-speed detector 
and motor status sensor in some 
cases. 

The motor-off delay timer 
automatically turns the drive motors 
off at a fixed amount of time after the 
last access. Because of the lack of 
this timer on the Radio Shack disk 
..nntfiiioi, tt>p ..rivo mo tor a ar* o£t«n 
accidentally left running when they 
could be powered off. This usually 
happens when a disk access is not 
followed by a keyboard' input 
operation, since the Radio Shack 
keyboard input routine roust implement 
a software timer to decide when to 
turn the motors off. 

The head-load delay timer and head- 
load status sensor provide better 
control over the status of the head- 
load solenoid. Unfortunately for the 
Radio Shack disk controller board, the 
Radio Shack supplied disk drives have 
no head-load solenoid and thus have no 
need for a head-load delay timer or 
head-load status sensor. Their 
inclusion on the board would have 
simplified the software supporting the 
drives with head-load solenoids. The 
Radio Snack software also assumes no 
head-load delay required, thus causing 
potential problems for drives which do 
not load the heads until selected. 
Drives with head-load solenoids which 
are to be used with the Radio Shack 
software should be strapped so that 
the heads are loaded whenever the 
motor is on. 

The only digital filtering provided for 
raw read signals is the 200 nsec. 
pulse shaping provided by 74LS221 
single-shot U7, The 1793 data sheet 
specifies that this pulse may be as 
short as 200 nsec. or as long as 600 
nsec. This filter may be materially 
improved by increasing the pulse width 
substantially; Increasing C21 to 200- 
2 50 pfd. would have the desired 
effect. If the change is made, it 
should be done on a trial basis and in 
a manner in which it may be easily 

Color Micro Journal 



removed; depending upon the drives, 
extra filtering may not improve actual 
the overall read performance. The 
purpose of digital filtering here is to 
reduce noise on the raw read line by 
forcing the filtered output to remain 
in the active state, once activated, 
for a minimum amount of time 
represented by the pulse width, thus 
stabilizing the filtered read data. 

Still another source of problems with 
the disk controller board concerns 
some of the components themselves* 
Several of the components* especially 
those In the VCO circuit associated 
with the 74LS629, should be of very 
high quality, since the stability of 
their values is critical to the proper 
functioning of the raw read data 
separation logic. However, they are 
of standard quality, causing excess 
drifting of their values associated 
with temperature and age, and 
necessitating frequent adjustment to 
maintain standards of voltage and 
frequency in the VCO and write pre- 
com pen. s at ion circuits. 

The interface board has three 
potentiometers for adjustment of the 
VCO and write pre-compensation 
circuits. These should be 14-turn 
precision units, but instead are 3/4- 
tucn inexpensive units, making precise 



alignment difficult to achieve and to 
maintain. Even dropping the disk 
controller board may upset the 
delicate adjustments. R8 and R15 
must be adjusted while the disk 
controller is in the Idle state. R8 is 
adjusted so that a 1,4 volt level may 
be measured on pin 2 of all. Then R15 
is adjusted so that a 2.02 MHz signal 
may be measured on pin 16 of U12. R16 
must be adjusted while the 1793 is 
executing a continuous write command. 
It is adjusted so that 200 nsec. 
pulses are detected on pin 4 of U12. 
Unfortunately, R16 cannot be adjusted 
without using a ROM port extender 
card or without removing the COCO 
case. Note that adjustment of these 
potentiometers requires a high- 
impedence voltmeter (R8), a frequency 
counter or oscilloscope (R15), and an 
oscilloscope (R16). 

SOFTWARE 

The Radio Shack supplied software (in 
terms of the ROM based BASICS) 
supports the Radio Shack supplied 
controller and drives on a minimal 
basis. Ideally, a complete ROM based 
disk operating system would be 
provided, including a logical interface 
which would shield the user from the 
details of the hardware and disk 
format. This system would include 



logical file open and close, sequential 
and random read and write on the byte 
and sector levels, and catalog utility 
operations such as rename and delete. 

What Radio Shack actually provides 
(and documents) for non-BASIC 
programmers is a low-level subroutine 
which is capable of "read or write 
specified drive, track, and sector" 
and "restore specified drive to track 
zero" operations only. It Is 
contained in the Extended Disk BASIC 
ROM. 

This routine, called DSKCON, is 
capable only of double (not single) 
density, 35 (not 40 or 80) track, 
single (not double) sided operations, 
with head step rate fixed at 30 (not 
6, 12, or 20) milliseconds. It has no 
provision for specification for 
automatic write verification, which 
should properly always be performed to 
prevent lost data and files. None of 
these parameters are modifiable 
without moving the entire routine to 
RAM and/or rewriting it, DSKCON was 
obviously designed for the ROM based 
Extended Disk BASIC and implements an 
almost minimal interface to the disk 
controller board. 

The entry point of DSKCON is pointed 
to by the contents of addresses SC004 



JUST GOOD SOFTWARE 



DISK DOUBLE ENTRY - I you have spent hours 
Irving to balance your Debits and Credits, this program is 
flat yoy' Designed tor small business. c»ub, and personal 

use Enter transactions m a journal type format. Program 
will maintain current account balance*, produce Ttial Bal- 
ance Income, and Balance Sheet reports and complete 
Account Ledgers Will handle up to 300 account* including 
report headings and totals. Up to 1 4Q0 average transactions 
on a diskette. Summary reports and four levels of subtotals 
available. REQUIRES 32K and a user understanding of 
Standard double entry accounting concepts. - S44.95 in 
BASIC with Machine Language subroutines. 



D I SK DATA HANDLER- 64 K ■ o, -, , n ed to u se 

the full 64 K RAM. but may also be configured for 32 K Uses 
standard ROM's • No special operating system required" 
Allows you lo design dish data files lor your specific needs 
Vow define a bask: record of up to 14 fields and 246 
characters Provides fast selection and sorting based on 
any field or combination of fields in this record. Powerful on 
screen input and update User defined output of reports to 
screen, printer, or disk files which may be read by your 
BASIC programs for any computational or special format- 
ting requirements. Printer reports alknw headings, page 
breaks, and page numbering, and let you pass control 
codes to drive your printer's special features Maximum 
number of records you may work with at one time will 
depend on RAM configuration and record size - 64 K I32K) 
1850 {50QI - Zl char records 1 79 (49) - 2*6 char record* 
An opt ional Extended record linked to the basic record may 
also be defined The size of this Extended record is not a 
factor in determining maximum number of records Will 
provide the growth capability needed for your increasingly 
sophisticated applications SS4 95 in BASIC with Machine 
Language subroutines. 

DATC-O-BASE CALENDAR - Puts you in charge 
of your schedule 1 Graphically displays any monthly calendar 
between 1700 and 2099 You put in up lo twelve 28 
character memos per day - calendar shows where I he 
memos are -call up of day shows details. Use lor appoint' 
ments and a log of past activity. Siudy the chronology of the 
American Revolution or note the day your mortgage will be 
paid ofl Search capability allows you lo l«sl or print all 
memos between two specified dates or only ones meeting 
key word criteria. Date compulation shows elapsed time 
between two dates m days, weeks, months, and years, 
REQUIRES 32K in BASIC 

TAPE DATE-O-BASt CALENDAR - $16 95 (max 4O0 
memos/tape Mel 

0>l SK O ATE-O-I AM CALENDAR * S 1 9 95 - (over 4.000 
memos/disk - ma* 300 memos/month, 



We want your 
SUGGESTIONS! 



Th it's I HTE R E ST-Jfig - Time to let your computer 
do some real computation' This program will help you solve 
problems dealing with time, money, and INTEREST. Calcu- 
lates present value, future value, and capital recovery lor 
any combination of payments you specify Rale of Return 
computation to predict how hard your money will be working. 
Special section to compute bond yields (current and to 
redemptKmi. Amortization schedules about any way you 
want them • even allows you lo change terms in mid 
schedule 1 All answers ava liable on screen or printer. $29 95 
in BASIC. 

MATH TUTOR ■ Five programs that gofrpm math lac! 
(+v ~ . X, /) drill to full addition, subtraction, multiplication, 
and division at four levels of difficulty Provides a step by 
step approach with error corredion and rewards lor good 
perlormance. - S1 3 95 in BASIC 

S PELLI NG TE AC N ER - Up lo 200 ol their spelling 
words stored on tape or dish are presented in four lively 
study modes mcl udmg a scram b4ed word game. - 1 1 295 m 
BASIC 

ALPHA-DRAW - A subroutine designed to let you 
easily add characters to your graphic displays. You define X 
and Y coordinates and a sir nq variable of one or more 
characters and Alpha' Draw will do the rest. Includes all 
keyboard characters Comes with instruction* for a true 
line numbered m*rg» of tape files. Works great with the 
Screen Print program! • S8.95 in BASIC 

GRAPHIC SCREEN PRINT PROGRAM - 

Works in ALL PMQDES and lets you shift screen image 
anywhere on the printed page Relocatable code lets you 
use ail of your tSKor 32K machine Available lor both CoJoi 
Basic 1 -0 and 1.1. Use EX EC 41 1 7 5 to see which you have 
and SPECIFY with order. In Machine Language. 

SPECIFY PRINTER TYPE 
$7.95 ■ For TRS-80" LPVII/Vlllo DMP 100/200/400 
•».*• • For Epson GRAFTRAX", PROvVRITER', NEC PC 
8023A-C. Microline" 82A/83A (with OKIQRAPH' I), Mlcroene 
84, IDS --1-10,44 C Paper Tiger' 460/560, Micro Prism' 480, 
Prism' 80/132 (with dot plotting], Micro Peripherals Inc 
88G/99G. Centronics 739. Star Micronics, Inc. GEMINI- 
10/15 TR5-80* DMP 120 

(Trademarks of Tandy Corp., Epson America. Inc.. C-Itoh, 
NEC America. Okidata Corp , Integral Data Systems, Inc.) 



ALL PROGRAMS require Extended Color Basic and are 
delivered on cassette. All. except Tape OateO-Base Calen- 
dar, are DISK System compatible ' 



Custom Software Engineering, Inc. 



807 Minutemen Causeway (D-3), Cocoa Beach, Florida 32931 

(305) 783-1083 




Foi WIS* and Master Card aiders 
Include type, account number, expiration 
date signature and phone number 
Sorry' No COO'S 



US iftfl CAMAD* add H 00 per cdar (or shipping 
Oversees S2.50 per o«der AH -p'-c** « U S dollars 
Florida midams add 6% mm* tat Return wnn«n two 
weeks il not completely satiaflad 



RAINBOW 

curate* no* 

atju 

ALL LISTED 

PROGRAMS 
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and $C005. Its parameter list is 
pointed to by the contents of 
addresses $C006 and $C007, the 
reverse of the the normal parameter 
passing logic in which the address of 
a parameter list is passed in a 
register to a routine. This 
parameter list is composed of the 
following parameters? 

Operation Code 1 byte 

$00 * restore to track 
$02 ■ read sector 
$03 = write sector w/o verify 
Drive Number 1 byte 

$00 to $03 
Track Number 1 byte 

$00 to $34 
Sector Number 1 byte 

$01 to $12 
Buffer Pointer 2 bytes 

address of a 256 byte buffer 
for read/write data 
Status Response (on=error) 1 byte 
-bit meaning 

7 drive not ready 

6 write protected 

5 write fault 

4 seek error/ 

sector not found 
3 CRC error 

2 lost data 

1 busy 

DSKCON does not permanently modify any 
registers except tor the condition 
code register. Any outputs of DSKCON 
are placed into the status response 
parameter and read buffer. The 
parameter and variable addresses are 
pointed to in ROM and hence constant, 
at least for a given ROM version. The 
parameter list is at addreses $00EA 
thru $00F0. The NMI logic causes a 
branch to $0109 when the NMI input to 
the 6809E is activated, in which is 
usually placed a branch to a 
subroutine in DSKCON to complete the 
operation. DSKCON also uses 
locations at 3008A and from S097E to 
$0986 tor temporary storage. The 
assembler language programmer must 
ensure that the contents of these 
locations are always maintained or 
preserved between calls to DSKCON. 

Given the limitations of DSKCON, many 
assembler language programmers choose 
to write their own disk drivers. For 
instance, every known version of FLEX 
for the COCO contains its own disk 
drivers. They usually support single 
and double density, single and double 
sided, 35 to 80 track, 6 to 30 msec* 
step rate, head load delay timer, 
write verify, and other features which 
are not implemented well by DSKCON and 
the Radio Shack disk controller 
board. Unfortunately, they have 
followed different standards for 
density and side selection and are 
generally compatible only in single 
sided, single density, 35 or 40 track 
mode. Also, unfortunately for non- 
FLEX COCO users, the formats of the 
FLEX catalog and data sectors are 
quite different from the formats used 
by COCO Extended Disk BASIC, so 
conversion requires special programs, 
and the disk and catalog routines are 
not transferable. 

CONCLUSIONS 

The Radio Shack TOS-80 Color Computer 
offers users an Inexpensive means of 
owing a computer with great 
potential. Even though Radio Shack 

20 



has taken a minimal approach on much 
of the hardware and software, the 
user will be able to avoid many of the 
problems and thus to use the system 
productively by following some of the 
suggestions discussed In this article. 
In particular, the following points 
should be emphasized: 

keep the disk controller adjusted; 

if using disk drives with head load 
solenoids, set drive option to 
load head when motor is on; 

try increasing the raw read pulse 
duration to 400-550 nsec.j 

replace VCO and precomp components 
with precision units (R8, R9, RU, 
R13, R15, R16, C14, C17); 

when using DSKCON, always read back 
sector Just written and retry 
write operation If necessary; 

consider using a "real" operating 
system, such as FLEX, rather than 
the resident COCO BASIC DOS. 

With these suggestions, the Color 
Computer should become much more 
reliable in the use of its disk drives* 
Maybe if enough people make these 
changes, their computers will be able 
to read the diskettes I send them and 
I can stay off the telephone. 

E. M. (Bud) Pass, Ph.D. 
Computer Systems Consultants, Inc. 



INSIDE 

the 

DRAGON 32 



Just what is this Dragon 32 that 
you see on the upper left hand corner 
of the cover of Rainbow Magazine? The 
Dragon 32 is England's answer to the 
Color Computer. (And a most 
Impressive answer it lsl) To start 
with, the first thing you notice when 
you first see it, is that it has an 
improved keyboard. Upon closer 
Inspection, it is similar to the 
original Model I keyboard manufactured 
by Hi-Tek. It is a standard 53 key 
Qwerty keyboard with a very nice 
smooth feel to it. Upon powering up, 
you get the following logo: 

(C) 1982 DRAGON DATA LTD, 
16K BASIC INTERPRETER 1.0, 
(C) 1982 by MICROSOFT 

As you can guess, it is the same 
Microsoft who wrote the Basic tor the 
Color Computer, To my surprise when 
comparing the Quick Reference Card of 
the Dragon 32 to that of the Coco, 
they have the exact error codes and 
statements except for DLOAD. The 
reason DLOAD is missing is that the 
Dragon 32 has no serial port. Instead 
it has a parallel port. One 
interesting command I noticed on the 
Dragon Quick Reference Card is the 
presence of a PRINTf-2 command 
instead of the usual LPRINT commands 
associated with parallel ports. This 
eliminates changing all the PRINT#-2 
commands of a Color Computer program 
to LPRINT commands. Even though the 
commands are the same, the actual 
BASIC is different from the Color 
Computer. This is because TANDY has 



exclusive rights to their version of 
Microsoft Basic for the Color 
Computer. While not all Coco Basic 
programs will run as is on the Dragon 
3 2, I tried several RS Rompaks and 
they all worked correctly. I even 
tried a long machine language program 
(Donkey King) and had no problems. 
Included with my Dragon 32 was a 
pamphlet of programs for it* This 
list has programs from Spectral 
Associates and Mark Data that have 
been previously sold for the Coco* 
This leads to the assumption that even 
though Coco programs may not run "as 
is" on the Dragon, they can be 
converted to do so. 

The Dragon 32 is aptly named as it 
comes stock with 32K of RAM. Unlike 
the 32K Coco from RS, Dragon uses two 
sets of 16K chips instead of (8) 64K 
chips. There are various hardware 
differences in the Dragon. The Dragon 
uses the PAL tv system instead of the 
U.S* NTSC system. Since there are no 
VHF tv stations in England, the RF 
output Is on channel 33 and the 
bandwidth is 8 MHz instead of 6. The 
video mixer chip is a LM1889 instead of 
a MC1372, The power supply (220 
volts, 53 Hz) is outside the computer 
and is connected via a DB-9 socket on 
the back next to the power switch. 
The two joystick, cassette and 
parallel printer jacks are on the left 
side along with the RF output and 
reset button. The Rompak port is on 
the familiar right hand side but there 
is no door. The Dragon 32 has one 
jack that the stock Coco doesn't 
have. There is a five pin din jack on 
the back for video out. This is a 
decided advantage tor those who want 
to do work processing to its fullest. 

To summarize, the Dragon 32 Is a 
fine computer with very close 
similarities to the Color Computer. 
The extra features of a better 
keyboard, parallel printer port, video 
output jack and white case are a 
definite advantage. But the best news 
is that a Dragon will soon be coming 
to your neighborhood! Starting this 
summer, a U.S. version of the Dragon 
will begin production in Florida, it 
will be a NTSC version with a serial 
port. Price will be very competitive 
with the Color Computer and will give 
potential Color Computer buyers 
another choice. 

Bob Rosen, Pres. 
SPECTRUM PROJECTS 



EDITOR'S NOTE 

Since this was written, things have 
been firmed up for the American 
version of the Dragon. It is being 
manufactured and distributed by 

TANO CORPORATION 

4301 Poche Court West 

New Orleans, La. 70129 

(504) 254-3500 

The "Standard" Dragon will be a 64K 
System which carries a suggested 
retail price of $399.00, with an 
estimated initial delivery date of July 
1983. Joy Sticks, Disk Drives, and 
Software will also be available* 

RLN 
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DOODLE BUG 



BY COMPUTERWARE 
P.O. BO* '669 
ENCINITOS. cfl. 9282* 

CASETTE S24.95 DISK «29.93 

THE OSne I TESTED WRS A 16K 
CflSETTE VERSION. THIS IS A TftKEOFF FROH 
THE POPULAR LADVBUG ARCADE GAME WITW VERY 
GOOD GRAPHICS. IT PLAYS JUST AS FAST AND 
MEAN AS THE ORIGINAL. THIS DANE IS 
DEFINITELY FOR THE LADYBUG FAN AND fl REAL 
CHALLENGE FOR NOVICE OR PRO. THE PLAY IS 
THE SANE FOR ALL LEVELS* THE DIFFERENCE 
IS THE NUMBER OF LADY BUGS YOU OET. FOR 
EACH BOARD VOU CLEAR THE BUGS CHASE IMS 
YOU CHANGE AND GET SMARTER SO THAT EACH 
BOARD GETS HARDER. 

IN THE MAZE THERE ARE HEARTS. DOTS 
AND LETTERS. THESE ADD TO YOUR SCORE AS 
YOUR LADY BUG EATS THEN . HOWEVER THERE 
IS A PROBLEM AS YOU TRY TO EAT THESE 
GOODIES THE BUGS FROM THE BUG BOX IN THE 
CENTER OF THE HAZE TRY TO EAT YOUR LADY 
BUG. IF YOU TIME IT RIGHT YOU CAN GO 
THROUGH THE REVOLVING DOORS AND LOOSE 
THESE PESKY VILLAINS. THE OTHER PROBLEM 
IS THE SKULLS PLRCED HT RANDOM AROUND THE 
MAZE. THESE MILL KILL YOU AND MUST BE 
AVOIDED «T ALL COSTS. THE LETTERS MUST BE 
EATEN WHEN THEY ARE THE RIGHT COLOR TO 
SPELL OUT THE WORDS SPECIAL AND EXTRA, 
THIS CAN BE DONE BY PRESSING THE FIRE 
BUTTON ON THE JOYSTICK TO HALT YOUR 
LADYBUG' S FORWARD MOTION OTHERWISE YOU 
HUN RIGHT OVER THEM. IF YOU SPELL "EXTRA " 
YOU GET AN EXTRA LADYBUG. AND FOR 
"SPECIAL" YOU GET A FULL SET OF NEW LADY 
BUGS TO PLAY WITH. 

THIS IS A FUN GAME AND WILL 
CHALLENGE YOU TO TRY TO BEAT IT. I AM NOT 
SURE WHAT THE HIGHEST SCORE THAT HAS BEEN 
MADE BUT I AM SURE THAT WHOEVER nWJE IT 
WILL STILL BE TRYING TO BETTER IT. IT'S 
THAT KIND OF GAME. 



Stuart Hatvkinaon 

6695 S. M. 203rd Court 

Alar*, OR <?7<jo7 

4S63) +42-9146 

July S, 19B3 

NEWS RELEASE! 

FOR IMMEDIATE RELEASE 

D1S* LOADER for th* TRS-BO Color Cosput.r loitft i»o*t I of 
itKhmi language pra^riM fro* tap* to dimk. This n*H 
prooran takes tap* batad Machine language prngnm, stores 
th#m on di.h, »nd alio*** then* to run autoaat ieal 1 y. DISK 
LOADER is .specially dvviqnvg to load program* which 
interfere with normal disk operation. S*va>a Multiple* 

tapi", all dms ramatming the program, and a -it D "ii t 1 c a 1 1 y 

oivaa prooraa load and ax acuta addrassas. DISK LOADER is 
supplied on tapa mth *a*y-to-op«rata in»tructiori*. Works 
with arty 32K or 64K Color Computer Disk systaia. * 13.93 ppd 
from Stuart Hawkinsan, ea-05 S. W. 203rd Court, Aloha, OR 
97007. 
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Joe Patrick 




SEM SAlEH RESEARCH 

■est «Ha Street 

Haw Salsa, Haaa, 01355 

H5M PBOPJCT AJffi«JSCEMEWT 
KAt£THOKIDHE AlIOWS YOU TO "SEE" MUSIC OH TV 

Her*** something aaw to do with your CoCo besides playing gaaeal 

Tha Kaleldophoa* a lions you to intartase to any hi-fi and aaa the aualc 
on TY. It's e**y to Install — Just plug loto tha headphone Jack on tha 
hi-fi and tha Joystick port on your conputar. 

Btaldaa tha hardware {which Includes all necessary plugs and cables) 
you receive a free issue of Kaleidorfeonlcs . a Caasttta "snjesifl*" of 
progrias for tha KalaldOfhor.e . Tha currant laaua cooaiata of acre than 
a doaen display prograas is BASIC (just choose than frca a aenu) plus 
nina machine TangiMga routines for high speed effects. 

There's a Lao an "instant projraa'" faatups which is vary nica — you 
Just type in letters on the keyboard to create a whole .-.an display proems. 
in seconds. Of course, you can also progru it yourself in BASIC or nachlne 
linguae*. Ten pases of detailed instructions art Included. 

The price eeens reasonable , considering that you gat both the hardware, 
fully assembled, and quit* a lot of software to run It (future updates *r» 
also planned). Tou can even use the display sodas that are unavailable in 
Extended BASIS! 

^areata aay find this a good, way to get their kids Interested in ooaputlng. 
And if* a great solution to th* old question of "Khst can you do with It 
heaidai play gases?" 

KaleldcpHione, New Sales Research, Vest Hal, rt Street! 
Sew Sales, Ness. 01355. 4^9.95. 16K, either BASIC. 



SPECTRUM 

32K RAM Button $ 2.99 

NANOS Reference Card $ 3.99 

64K RAM Button $ 4.99 

Coco Editor Assembler. $ 6.95 

Coco Tech Manual $ 7.95 

16K RAM Chips $ 9.95 

Coco Secrets Revealed Book .$ 14.95 

LED On/Off Indicator .$ 14.95 

Coco Light Pen $ 19.95 

ATARI Joystick interface $ 19.95 

Video Interface Kit .| 24.95 

16K-32K Upgrade Kit ■$ 25.95 

6883 SAM Chip.... .$ 29.95 

6809E CPU Chip.... 1 29.95 

Basic ROM 1.1 ...$ 36.00 

64K RAM Chips J 49.95 

MARK DATA Keyboard J$ 69.95 

BOTEK Printer Interface $ 69.95 

Extended Basic ROM .$ 84.00 

Disk Controller. ,$ 139.95 

COLOR COMPUTERS $ CALL 

Call or Write for FREE Catalog 

SPECTRUM PROJECTS 

93-15 86th Or Woodhaven, New York 11421 

Add Sales Tax & $3.00 for S/H 

## Dealer/Club Inquires Invited ## 

212 441-2807 
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COMMUNICATING 

with your 

Color Computer 



One of the added features of the Color 
Computer is the built in RS232 
interface. It can be used to hook up 
a serial printer like the DMP-100. 
More important though, it can be used 
to help you communicate. Communicate? 
That's right!! There is a Whole new 
world of telecommunications that many 
COCO owners are unaware of. Besides 
playing games and writing programs, 
you can hook up a modem to your RS232 
port. A modem is an electronic device 
which converts the computer's 
electrical pulses bit by bit into 
audible sounds that can be 
transmitted over the phone lines. 
Modem stands for Modulator/ 
DEModulator and there are two types 
available. 

The two types of modems currently 
available on the market are the 
Di rect-connect modem and the 
Acoustic -coupled modem. Both have 
their advantages. The Dlrect-connect 
unit hooks right into the phone lines. 
The Radio Shack DC Modem I (26-1172) 
allows you to unplug your phone from 
the jack and hook it into their unit. 
Then you can plug the cable from the 
Modem I back into your phone jack. 
This assumes that your phone and jack 
are modular. If not. Radio Shack 
sells two adapters, 279-393 and 279- 
351, that will convert your hook up to 
modular. Since the Direct-Connect 
unit hooks right into the line, 
virtually no external noise can be 
detected which means someone else in 
the room can be watching tv or 
listening to a stereo. The Acoustic- 
Coupled Modem is even easier to hook 
up. The hookup is the same as adding 
a telephone answering machine. If you 
have no extra jacks. Radio Shack sells 
two *Y" adapters, 279-357 and 279- 
370, for modular and 4 prong systems. 
The Acoustic-Coupled Modem is more 
susceptible to line noise as you are 
placing your phone* s receiver into the 
unit's two cups. This can be a 
problem if you are calling long 
distance and the signal on the other 
end is weak. Another problem is that 
today's modern phones might not fit 
the modem's circular cups (Slim line 
phones). One advantage to this modem 
is that it is more flexible to use with 
multi-line phone systems than the DC 
Modem I because all you have to do is 
push buttons to use the modem on 
another line. The only other piece of 
hardware you will need for your modem 
is a serial cable to hook it up to the 
RS232 port. For Radio Shack modems, 
you will need a 4-pin DIN to 4-pin DIN 
cable and for non-Radio Shack modems 
a 4 pin DIN to DB25 cable. These are 
available from the Shack as catalog 
numbers 26-3020 and 26-3014 
respectively. Also, available from 
Spectrum Projects are two cables 



which you might need. One is a 
Printer/Modem Extension Cable which 
allows you to place your modem in 
another location. It extends your 3 
foot Radio Shack cable another 10 
feet. The second cable Is the RS232 
Expansion Cable. This is a "f 1 
adapter cable which allows you to hook 
up your printer and modem inline 
independently at the same time. This 
eliminates constant swapping out of 
cables, since the Color Computer t\as 
only one RS232 port. Also, as you will 
see later on, it will come in handy 
when using a smart terminal program. 

Now that you have the hardware 
situation taken care of, you will need 
software. As with the modems, there 
are two types of software. The first 
type is known as Dumb Terminal 
Software. Radio Shack sells a version 
under the Videotex name. It is 
catalog number 26-2222 and includes 
one free hour on the Dow Jones and 
CompuServe Networks. The software 
allows access to these networks, but 
that's about all it does. It lacks the 
desired features that a smart 
terminal program contains. 

Now you might ask, what can a Smart 
Terminal Program do for me that a Dumb 
Terminal doesn't? The Smart Terminal 
Program can take the information you 
access from a telecommunications 
system and store it into your 
computer's memory. After you go off 
line from a system, you have the option 
of printing it out or writing it as a 
cassette or disk tile. Or, you can 
type a message offline and then upload 
with a single keystroke to the Host 
computer. Since networks such as 
CompuServe and The Source charge for 
their services, this can save you 
money as it can transmit it taster 
than you can type and it allows you to 
examine it for errors while offline. 
Another nice feature of a Smart 
Terminal Program is that it enables 
you to change any RS232 or printer 
parameters. For example, it allows 
you to access half duplex systems and 
use 1200 baud modems. You can run 
your printer at 1200 baud and insert a 
carriage return after a linefeed. 
Another bonus a Smart Terminal 
Program has to offer is that you can 
scroll online or offline up to 12 lines 
at a time. Where can you purchase 
such a program? Spectrum Projects 
sells their Smart Terminal Package 
under the name COLORCOM/E. It is 
available on Rompack or Disk for 
$49.95. It does not offer any free 
time for CompuServe and Dow Jones, but 
does offer the desired features of a 
Smart Terminal Program. One can still 
purchase from Radio Shack a Universal 
Sign Up Kit (26-2224) to go on line 
with CompuServe and Dow Jones. 
However, this kit contains no 
software. It can be used though in 
conjunction with a Smart Terminal 
Program. 

Now that you know more about the 
hardware and software which is 
involved, you may ask, what else can I 
access besides large data bases which 



charge for the use of their systems? 
The answer is a growing phenomena 
called Bulletin Board Services which 
are mushrooming all over the United 
States, What is a Bulletin Board 
Service, you ask? A Bulletin Board 
Service, or BBS for short, consists of 
an individual with a personal computer 
and an auto-answer modem set up to 
have outside callers access their 
computer* (Yes, your own mini 
CompuServe!) Aside from the auto 
answer modem, one needs special BBS 
Software to run the system. For 
example. Spectrum Projects owns and 
operates TWO BBS's which totally 
support the Color Computer. The 
first system can be accessed by 
dialing (212) 441-3755. It is operated 
and run on a Model III with four 
double-headed disk drives. It has a 
disk storage capacity of 2.6 
megabytes. The system is FREE and NO 
PASSWORDS are needed to access the 
system. Some features of the system 
are a message retrieval section, a 
downloading section, a merchandise 
section, and a Color Graphics section. 
Using the Smart Terminal Program 
COLORCOM/E, you can dial into the 
system and capture files from the 
download section. These files consist 
of games and utilities which you can 
run on your Color Computer. Also, as 
an added feature. Color Graphics can 
be accessed through the phone lines 
right onto your TV set. COLORCOM/E 
has the ability to read 8 bit color 
Graphics, In the message retrieval 
section you can leave or retrieve 
messages with other users of the 
system. It is a way to get info on the 
Color Computer that is not readily 
available through other channels. You 
can ask technical questions, get 
opinions on Color Computer Hardware 
or Software, and place an ad. In the 
merchandise section is a list and 
description of products from the 
leading Color Computer advertisers. 

There is one last thing you can do 
with your modem. Become a COCO sysop! 
Sysop stands for SYStem Operator. 
The second BBS which is operated by 
SPECTRUM PROJECTS can be accessed by 
dialing (212) 441-3766. It will also 
be accessed if you call BBS#1 and it is 
being used. It is switched over from 
BBSI1 to BBS#2 via ringover. The 
second Bulletin Board is operated on a 
Color Computer. The minimum 
requirements to run a BBS on a Color 
Computer are 64K of RAM, two disk 
drives, and a auto answer modem. And 
of course, BBS software] 

Bulletin Boards have proven to be very 
profitable investments as yours truly 
can attest to* Just imagine sitting 
in front of your COCO BBS and watching 
i t be accessed by a complete stranger 
at any time of day or night from 
anywhere in the worldl Make way for 
the Bulletin Board System - THE WAVE 
OF THE FUTUREin 

Bob Rosen, Pres. 
Spectrum Projects 



22 



Color Micro Journal 







Sff 6 



lilli 



Color Micro Journal 



23 






" 



laztt mnt/buB 



TRS-80C Color Computer 
16K Extended Basic 

After spending a year and a half 
learning Basic and some machine 
language on my Sinclair micro I 
decided it was time to go to a machine 
with a little more versatility. Partly 
because of the lower cost I decided to 
buy the TRS-80C Color Computer. 

After a month or so I wrote a short 
Basic program to test the speed of 
the CoCo. I was pleasantly surprised. 

About the Program 

The program is fully documented on the 
screen. Use the Right Joystick to 
move the laser cannon left and right; 
use the li rebut tori to shoot down the 
•H" wing fighters. There will be 10 
fighters (more if you have consecutive 
hits) . A hit will be so indicated on 
the graphics screen and a score after 
each round. 

The following will explain the 
mechanics of the program: 

90 - A$ draws "HIT" on graphics 

screen 
100 - L$ is sound for laser cannon 

fire 
110 - BS prints the title at the top 

of the graphics screen 
130-180 - draws the starbase 
190-220 - draws "H* wing fighter and 

"gets" it in matrix dimensioned by 

A (11,11) 
240 - sets variables to zero for 

score keeping, number of attempts, 

and number of fighters to appear 
260 - to randomly place fighters on 

screen and erase previous position 

of laser cannon 
280 - laser tire from fighter 
290 - "puts* fighter randomly on 

screen controlled by X and Y 
300 - detects whether fire button is 

pressed or not 
310 - fires the cannon from joystick 

position vertically 
320 - variable N keeps track of no* of 

shots fired 
330 - checks for hit or no-hit 
350 - explosion and sound if fighter 

is hit 
370 - back to main loop 
380 - subroutine to set new position 

of cannon once each time through 

the main loop 
400-490 - routine to place the next 

fighter on screen if previous one 

is missed 
500-530 - subroutine for Instructions 
540—600 - gives score and status of 

starbase and restart 

- Subroutine to create animation 



Note: For greater speed enter from 
the keyboard: POKE 65495,0 (will not 

^ work on machines manufactured before 
Oct *82} . Before saving to tape do 
the following: POKE 65494,0. If you 
fail to do this the program will not 
load back into the machine. To test 
your machine POKE 65495*0. If your 

^ cursor speeds up considerably you can 



probably safely run the program at the 
high speed. If there is no noticeable 
difference in the cursor POKE 65494,0 
to get it back to normal (if the whole 
system is hung up, hit RESET and 
reload the Program) and then RUN the 
program. 

Victor Rogers 



10 'LASER WARS 

20 'BY VICTOR ROGERS 

30 '3107 ELMORE AVE. -CHATTANOOGA 

, TENNESSEE 37415 

40 CLS3 

50 GOSLIB 500 

60 DIM A(ll,ll) 

70 CLS 

80 J=JOYSTK(0) 

90 A$=»BM110,170;U5jDl0,*U5,-R3;U5 

;D10;U5;B;R6;U7;B;U2;UlfB?R9;D5; 

ul0,-L3rR6* 

100 L$--V31T25504 jAGFED" 

110 B$» "BM60,0;D8;R4;B;R3;U8;R4 

;D4;L4;R4;D4jBjR3jR4;U4,*L4;U4;R4 

;BjR3;R4;L4;D4;R3;L3,-D4;R4?BjR3j 

U8;R4;D4;L4;Rl;Dl;RljDl;Rl;Dl?Rl 

;Dl;Rl;B»R6?U8;D8;RlyUl;Rl ? Ul;R2 

;D1;R1;D1;R1;U8;D8;B;R3;U8;R4;D4 

;L4jR4?D4?B;R3;U8;R4;D4;L4jRl;Dl 

;R1;D1;R1|D1;R1;D1;R1" 

120 PM0DE4,1:PCLS 

130 CIRCLE (128, 90) ,30,,. 25 

140 CIRCLE (128, 65), 20,,. 25 

150 CIRCLE (128, 127), 45, ,.25 

160 LINE(45,140) -(94,55) ,PSET 

170 LINE(2ll,140)-(162,55),PSET 

180 LINE(94,55)-(162,55),PSET 

190 DRAW"BM128,127;U4;De;U4;R10j 

U4;D8" 

200 C1RCLE{134,127),4,,.25 

210 CIRCLE(132,127),4.5,,.25 

220 GET(128,122)-(138,132),A,G 

230 DRAW BS 

250 SCREEN 1,1 

260 X=RND(234)+12:Y=RND(43)+12!L 

INE(J*4,192)-((J*4)+6,186),PRESE 

T,BF:LINE(105,175)-(134,155),PRE 

SET,BF 

270 GOSUB 380 

275 SCREEN 1,1 

290 PUT(X,Y)-(X+10,Y+10),A,AND 

295 GOSUB 1000 

296 IFXM2 AND R<-123THENX«X-10E 
LSE X=X+10::IF Y>12 AND RK12 TH 
EN Y-Y-10ELSE Y=Y+10 

298 FUT(X,Y)-(X-fl0,Y+10),A f PSET 

299 S0UND1 2,1: LINE (X,Y+9)-(J*4 p l 
75),PSET:LINE(X,Y+9)-(J*4,175) ,P 
RESET 

300 P=PEEK (65280) t IF P=2540R P-l 
26 THEN PLAY L$ 

310 IF P=254 OR P-126 THEN LINE( 

J*4,192)-(J*4,12),PSET:LINE(J*4, 

192)-(J*4,12),PRESET:N=N+1 

320 IFN>10THEN GOTO400 

330 IF PP0INT(X+5 ,Y+5)=0 OR PPO 

lWT(X+6,Y+5)=0 OR PPOINT(X+7,Y+5 

)«0 OR PPOINT(X+4,Y>5)-0 OR PPOI 

NT(X+7,Y+5)=0 THEN 350 

340 GOTO 360 

350 CIRCLE(X+5,Y+5),2:PAINT(X,Y) 

,0, i : LINE(X,Y) -(X+10, Y+10) ,PRESE 

T,BF: PLAY*V3l01T255AD3AGFED ,r : F=F 

+1:N=0:T-T+1;DRAW A$:GOTO260 

360 LINE (J*4 , 192) -((J*4)+€, 186), 

PRESET, BF 

370 GOTO270 

380 J^JQYSTK ( 0) : LINE ( J*4 , 192) - ( ( 

J*4)+6,186),PSET,BF 

390 RETURN 

400 LINE (X,¥)-(X+10,Y+10), PRESET 



,BF:N-0 

410 SOUND 200,4:SOUND 220,4 

420 PUT(122,61)- (132,69) ,A,PSET 

430 FOR G=l TO 500:NEXT 

440 LINE( 122,61) -(132,69), PRESET 

,BF 

450 CIRCLE(128,65),20,,,25 
460 PUT(123 l 85)-(133,95),A r PSET 
470 FOR G=l TO 500:NEXT 
480 T=T+1:IF T>=10 THEN 540 
490 LINE (123, 85) -(133, 95), PRESET 
,BF:GOTO260 

500 PRINTS 39, W ***LASER WARS***" 
510 PRIWF§65,*TO DESTROY FIGHTE 
RS USE RIGHT JOYSTICK (MOVE RIGHT 
, LEFT AND PRESS FIREBUTTON) . 
YOU HAVE (10) SHOTS AT EACH FIGHT 
ER. THERE WILL BE (10) FIGHTE 
RS ATTACK YOU AND YOUR STARBASE. 
GOOD LUCK COMMANDER! mi!" 

520 PRINTP. 327, "PRESS ANY KEY TO 
BEGIN." 

530 G$=INKEY$:IF G$<>"" THEN RET 
URN ELSE 530 
540 CLS3:SCREEN0,1 
550 PRINTg65,"YQU DESTROYED "F" 

OF "T" FIGHTERS." 

560 IF F>7 THEN PRINT? 256, **THE 
STARBASE IS SECURE*" ELSE PRINTf 
256,"*THE STARBASE IS LOST*" 
570 PRINT@ 325, "AGAIN? (Y/N) " 
580 R$=INKEY$:IFR$=""THEN580 
590 IFRS="N"THEN ENDELSE600 
600 RUN40 

1000 LINE(X,Y)-(X+10,Y+10),PRESE 
T,BF 

1005 R»RND(234)+l2iRl=RND(43)+12 
1020 RETURN 



Rail Runner 



BY COMPUTE HUORE 
P.O. BOX 569 
ENCINITAS.CA* 92B24 

CA5ETTE 42I.33 DISK »26* 99 

I TESTED THE TAPE VERSION WHICH 
TAKES I6K. THIS GOME IS A "RESCUE" TVPE 
GAME WITH A SCREEN WHICH IS IN SOME WAYS 
LIKE FROGGER. THE MOVEMENT OF YOUR RAIL 
RUNNER IS CONTROLLED BY THE ARROW KEYS ON 
THE KEY-BOARD AND THE SCREEN IS QUITE 
BUSY. THE GAME WILL PROBABLY APPEAL MORE 
TO THE YOUNG THAN THE EXPERIENCED PLAYER. 
THE SCREEN IS FILLED WITH TRPCKS OCCUPIED 
BY MOVING HANDCARS AND ENGINES, AND YOU 
MUST MANEUVER YOUR RAIL RUNNER FROM THE 
TOP OF THE SCREEN TO THE BOTTOM WITHOUT 
BEING HIT THEN ENTER THE SQUARE WHERE THE 
HOBOES WAIT TO BE RESCUED. ON THE SECOND 
BOARD THE YARD IS REAL BUSY. THE GRAPHICS 
ARE WELL DONE BUT THERE IS LITTLE SOUND 
TO GO WITH THE MOVEMENT OF THE SCREEN. 

THIS GAME WILL APPEAL TO THE 
FROGGEH FANS BY VIRTUE OF IT 1 9 FROGGER 
LIKE SCREEN. AND IT WILL APPEAL TO THE 
YOUNGER PLAYERS BY VIRTUE OF IT'S 
INTEREST IMG SCREEN. IT SHOULD BE A VERY 
GOOD PROGRAM FOR DEVELOPMENT OF HAND EYE 
COORDINATION IN THE YOUNGER PLAYER. THE 
PLAY IS QUITE FAST AND THERE ARE THREE 
LEVELS OF DIFICULTY TO KEEP THE GAME 
INTRESTINO THE FIRST LEVEL IS SIMPLE AND 
THE THIRD IS COMPLEX RE QUI WEI NO TWO 
PASSES TO SAVE THE HOBO. FOR THE YOUNGER 
PLAYER I HEARTILY RECOMMEND BUYING IT. 



Joe Patrick 
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MEGAPEDE 



P B J, Inc. 

an COLUMBIA AVENUE 

NORTH BERGEN. NEW JERSEY 070*7 

PHONE. (201) 3»0 MK8 




PRODUCT PNNQUNCEMENT 

ABJ, {ne« l* pleasad to announca tna Availability of tha> following 

orodjcta for tn« Radio Shack Color CoaoutBTS 

Tha WOAD-PAK is * vidio board da*igna>d to plug into th« axoanstori 
£»•** of trua Color Oc-noutar- and proviaa* t-io uur with * high 
quality, 88 coluttn vidoo output. That Board i« eomoatinla witn 
moat rion-graanie Baaic programs and can 5a usad mth disk through 
t-* usa of a "v- caola. Software oroviead with th# soard providaa 
t*r.,!;r,ai 'unrtigrs bucm am; arase to and of Una, Brass* to and of 
scraan, bona cursor, sourw Sail, tc~y cufiar positioning, ltd and 
t»t ability to raarogran ttia icrrtn format for coasat toil Ity with 
otnar eoMoutar*. additional softttar-a auoaort ineludaa a Fls* 
«tci, wmen allot** tna u«*r to run ALL standard Flan voftnara 
without Modification, and an annancad varaion of TEXPROIIX {taut 
atiitor/srocasaor). Futura toftwara support Mill includa 

•oraad».*iaat and nufir.ni application programs. 

C-C BUS 

Tna C-C BUS ia an aHoanaion 3ut tfiicn connacta to tha txainnon 
»rt of fc9f Color Corwoutar and providaa tna uur with sin software 
aalactaola atoansion aorta. Tha board ia eoaplataly compatible 
witfi any ana systte, and automatically sense* systsat si ie to 
sravant contention areolae*, tna board alio allows tha uaar to 
**z*no memory bayond tna 64M Unit by utilizing a bank aw itching 
ecnema. A tyaical syatsai eigne contain a disk controller, a 
parallel orintar cartridge, a IfiK RAft board and a WORD-«*K all 
installed and aval labia to tna CPU. Tha C-C BUS can also ba 
auaoliad eitfl an ootional p a waa supply to pans** tna parlpnaral 
cart r i dga*7 ooare a. 



we^-ppm l&K HAS/TOM expansion board [supplied with laM RAN*. 
■ 

Centronics compatible parallal printar port treat tiaa 



P-C 

clock avai labia m an option), 

PR070 CoCo Prototyping board. 

All of tna above arm available as bara boards with documentation. 
Pricaa mrm aa follows* 



UC&O-MK 


• 139.99 


(sat) 


*SJ, 93 


<bb) 


C-C BUS 


•iaa. aa 


(alt) 


•37.95 


<M» 


WE-H-3AK 


• IK. |f 


■:*it) 


• 17.93 


<bb> 


P-C 3«K 


» 79,95 


(att> 


• IB* 93 


<bb> 


PTOTQ CoCo 


» 14.93 
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DISTRIBUTED BY 

COMrUTERMARE 
P.O. BOX 669 
ENCINITPS, Cfl. 92924 

CftSETTE »21.93 DISK *26. 93 

THE BATE I TESTED WAS A 1BK 
CASETTE VERSION. THIS IS AN EXCELLENT 
ADAPTATION OF THE PftCADE MILLIPEDE GAME. 
IT HAS EXCELLENT MI-RES. GRAPHICS. AND 
GOOD PLAY ACTION FROM SLOW TO VERY FAST 
ON FOUR DISTINCT LEVELS. THE ONLY THINGS 
HISSING FROM THE PLAYFIELD ARE THE DDT 
CANISTERS AND THE WANDERING BUG RT THE 
BOTTOM OF THE SCREEN. 

ONE OF THE NICE TOUCHES OF THIS 
GAME IS THE ABILITY TO DO ALL OF YOUR 
NECESSARY SELECTIONS FROM THE JOYSTICK 
INSTEAD OF HAVING TO USE THE KEYBOARD. 
THE PLAY ON THE FIRST TWO LEVELS (NICE 
AND RUFF) IS SLOW AND VERY GOOD FOR THE 
BEGINNER .BUT THE OTHE TWO (FOWL AND 
NEAN> ARE DEFINITELY FOR THE ADVANCED 
PLAYER AS THE ACTION BECOMES FAST AND 
FURIOUS. THOSE OF YOU WHO HAVE PURCHASED 
THE WICO ADAPTOR FOR THE ATARI JOYSTICKS 
WILL FIND THAT NOT EVERYTHING WILL WORK 
PROPERLY. I EXPERIENCED SOME TROUBLE IN 
GETTING THIS AND THE JOYSTICKS MODIFIED 
BY THE ARTICLE IN CREATIVE COMPUTING TO 
SELECT THE ROUGH PLAY LEVEL. OTHERWISE 
THERE WAS NOT ANY PROBLEMS. 

THE BOARD IS WELL DOME AND I 
FOUND THAT THE HIGHER THE LEVEL SELECTED 
THE MORE MUSHROOMS ON SCREEN THESE CAN 
HELP YOU IF THEY ARE IN A ROW BY ROUTING 
THE MILLAPEDE TOWARD YOU. BUT WATCH OUT 
THERE ARE ALWAYS RT LEAST FOUR HEADS ON 
THE BOARD AND THE FLEAS FALL AT RANDOM 
AND VERY FAST. THIS IS VERY LIKE 
MILLIPEDE IN IT'S ACTIONS. I FOUND NO 
GHOSTS ( THAT IS THINGS ON THE SCREEN 
THAT YOUR SHOTS PASS THROUGH WITHOUT 
EFFECT) OR OTHER STRANGE SUDDEN NOVES 
WHICH OCCUR IN SOME OTHER GAMES. ONE 
THINO 1 DID FIND WAS THAT YOU CAN 
SEEMINGLY GET HUNG UP IN A SLOT BETWEEN 
THE MUSHROOMS. THIS OCCURS BECAUSE YOU 

EMTCBCB TJIC NOW BIMHHhLLr AMD CAN Ota_tf 

LEAVE THAT WAY. DURING THE HEAT OF THE 
DAME THIS FACT WILL PROBABLY ESCAPE YOU. 
IT SURE DID MET 

OF THE GAMES OF THIS TYPE I HAVE 
PLAYED THIS IS THE SMOOTHEST AND MOST 
ENTERTAINING I HAVE SEEN. IT IS WELL 
WORTH YOUR TIME AND MONEY TO GET A COPY . 
TRY IT YOU'LL LIKE IT ! 



Joe Patrick 



if If i Computer Software 



SUPER SLEUTH DISASSEMBLER 


Each EtS-PLEX 


l !P*cJy fO 1 6*0. tMJ 


•toioa/a 


d> itH zao 908U bi 




Oiwr Dm* Vhmw i«*0..'*«1?i 


SSD.OO 


Fw ClWOtFLEK 




CcCn 'Ufnlh 


*4ftOO 


CROSS-ASSEMBLERS 


Eaori BSD FLEX 


llpwbly lor B0O3 i firXKI 


i55 OS/3 


&»Q7 £«o in IKH1f> r»i 




DEBUGGING SIMULATORS 


Caeh trSFLEX 


lUfVilv lor SM» or S.M?l 


tlOOOS/9 


saoa-TO-aaoa assembler klaxon 


ara-FLEX 




UI-OS/A 


aeooa * aaoa nc xlatoas 


Both I50FLEX 




t 75 OS/9 


nJLL SCREEN T8C XBABIC PflOOflAMS FOB FLEX 


i *ilh lul nuti4# coniro^ 




MAILING LIST 


aioo 


INVENTORY/MBP 


*1 


TABULA RASA SPREADSHEET 


aioo 


XSASJCXPC u n liti E ;-, 


ah at b 



it**-! •■*!. ..pt ncl B»m 

Computar SyBtammConiultants, Inc. 

1434 Latta L«n« 

Canyara, Oaorgia 30207 

404-483-1717/4570 

Program* In source on S'VB" diaft. 

Do I a >ied printed manual* providvrj. 

Call tor catalog or dealer information. 



VISA and MASTER CARD accepted 
US Funds Only 



Add s<fe snipping 



nji. .-. Ii» WW &nmH CB i|mm 
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baby COCO 



There it was, sitting in a glass 
cabinet along with its user manual - 
Tandy's newest computer. It was 
SMALL! According to the salesman, 
it Is going to blow the competition out 
©E the water. Radio Shack's marketing 
people call it the Micro Color 
Computer. The manual designates it as 
the MC-10. I hereby dub it (may I have 
the ceremonial sword, please?) Baby 
CoCo. 

I picked one up recently, and had a 

fascinating weekend poking around 
inside. Herewith is my first report. 

HOW GOOD IS IT? 

Graphics are the same as you get on the 
standard (non-extended BASIC) CoCo. 
This puts the Baby CoCo in the same 
league as the Timex 1000, which is a 
long way behind the VIC-20, TT-99/4A, 
and Atari 400. 

Text on the screen is identical to the 
standard CoCo — 32 characters wide 
by 16 lines high. No lower-case is 
supported, although you can get 
reversed letters. I doubt that we 
will see any 51x24 upgrades Cor this 
computer. These depend on the 6883 
SAM Chip, which is not present in the 
Baby CoCo* 

Memory is 4K standard. Surprise: This 
is 4224, not 4096. A 16,384 byte 
expander module Is to be made 
available in the future. Baby CoCo is 
a little above most ot its 
competition in this regard — partly 
because the graphics are so poor. 

BASIC is (o£ course) from Microsoft, 
with Radio Shack's syntax. Provided 
PEEK and POKE are not used, almost 
anything written for the standard 
CoCo will work on the Baby CoCo if it 
fits into memory. You will (for the 
present, at least) have to type it In 
because the cassettes are not 
compatible, 

A couple of surprises: 

* The ELSE clause is missing. 

* The Baby CoCo has several functions 
not available in the standard CoCo 
unless you get Extended BASIC: 
VARPTR, LOG, EXP, SQR. 

* Contrary to the manual's statement, 
POKE will work to any address 
between and 65535. Video RAM is 
from 16384 to 16895. Just for fun, 
try POKE 20,0 and see If you can 
figure out what happened (It won't 
break the MC-10, though you will 
have to switch it off to regain 
control) , 

* CLEAR has a second parameter, 
whose function is identical to that 
in the standard CoCo. There is 
also an EXEC statement. Sorry, no 
CLOADM — hence no assembler* 
There is no Information in the 
manual about machine language 
programs. But a USR function 
exists if we can only figure out 
where to POKE the execution 
address. 
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Cassette tapes use a similar format. 
Some salesmen will insist that it is 
the same. This does not tnean you can 
CSAVE a program on the CoCo and get 
it to CLOAD on the baby CoCo. We'll 
discuss this matter further another 
time. 

Printer interface is identical to the 
standard CoCo. The manual does not 
give you the POKE values for non- 
standard baud rates. Here they are. 



i* 



*v* 






NEWS RELEASE 

i*o<Hd b« o1 inter hi to j»* rttdari I 



Baud Rate 


Value of n 


300 


244 


600 


118 (default) 


1200 


56 


2400 


24 



These values all work using a Bo-Tek 
interface. To use a baud rate other 
than 600, simply POKE the value from 
the table above Into 16932* For 
example, setting your machine to 2400 
baud Is done byt 

POKE 16932,24 

I have tested all of these numbers 
out with a BoTek interface ($69.95, 
their address is 4949 Hampshire, 
Utica MI 48087} and an Epson MX-80 
printer. If you have occasional bad 
characters, try adjusting the number 
up or down slightly* 

Serial Interface is (sorry 'bout that) 
almost identical to the standard 
CoCo. My regret is because the 6803 
has a built-in UART which Radio Shack 
has not used. It will probably work 
but only at unusable baud rates such 
as 244.5. 

Expansion is going to be difficult on 
the system. There is no ROM socket, 
only a card^edge on the back similar 
to the Timex machine. Reliability of 
the connection should be fairly good 
— they have a couple of screw holes 
that will allow a firm grip to 
whatever plugs in there. Of course, 
no gold-plated contacts* 

There is no provision for joysticks* 

CONCLUSION 

What will Radio Shack Accomplish with 
their new computer? Not much at the 
current price. Once they get It below 
$100, advertising should get the 
machine to sell — but only if they come 
up with lots of Inexpensive software on 
cassette. With no ROM pack socket, 
that may be exactly what they nave in 
mind, 



by John Beckett 
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Spectrum Projects is pleased to announce their 
newest product the "SPECTRUM CONTROL CUTE IT. 
The ICC eliminates ever having to grope around 
behind your Color Computer, fumbing with cables 
and plugs by extending alt the jacks to an 
interface box which can be mounted anywhere. 

Features of the "SrECTHUM COITRDL CEKIEi" are : 

1) A switch selected Printer /Modem port Now 
both your printer and modem can be plugged in 
at the same time, but individually selected by a 
top mounted switch 

2) A cassette switch for those people who don't 
own CTR-80 and CCR-B1 cassette recorders. 
Eliminates unplugging cables in order to rewind 
or test forward tape, 

3) A LEO power indicator to tell you whether 
your computer is on or off 



$99,95 + $3 00 SJH 
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BY COMPUTE RWARE 
P.O. BOX E£9 

EMCtNlTftS, CA, 92024 

COSETTE *Z1.93 DISK 426.33 

THE PROGRAM I TESTED MPS A 1EK 
CASETTE VERSION. THIS 18 A GOOD 

ELECTRONIC SYNTHESIZER PROGRAM FOR THE 
COLOR COMPUTER. IT PRODUCES AN EXCELLENT 
RANGE OF MUSICAL NOTES FROM THE COMMON TO 
THE EXOTIC THE PROGRAM 15 QUITE COMPLEX 
SO THE BOOK MUST BE READ FIRST OR YOU 
HILL BE LIKELY TO HAVE MUTCH TROUBLE 
GETTING STARTED, IT IS PLEASANT TO WOVE 
THE DISPLAY OF ALL THE KEYS AND SETTINGS 
ON THE SCREEN OF THE TV. AUDIO COMES FROM 
THE TV SPEAKER AS MELL AS THE CASETTE 
PLUG MAKlNfi IT POSSIBLE TO ACCORD VOUR 
MASTERPIECES ON TAPE. IT IS ABOUT LIKE 
USING ONE OF THE PORTABLE SYNTHESIZERS ON 
THE MARKET. 

THE SYNTHESIZER RESPONDS WELL AND 
IT IS POSSIBLE TO SET UP A COMBINATION 
USING THE BASIC VOICES WHICH SOUNDS 
EITHER LIKE A PLEASANT ORGAN OP. THE 
MILDEST "OUTER SPACE" TYPE OF MUSIC. YOU 
HAVE COMPLETE CONTROLL OF "ADSR" WHICH 
DIVES YOU TOTAL CONTROLL OVER THE SOUNDS 
THAT YOU MILL GENERATE. THE KEYBOARD IS 
REPRESENTED BY THE UPPER OR ■QWERTY" NOW 
WITH THE NUMERIC KEYS REPRESENT I NO THE 
FLATS AND SHARPS. THE LOWER TWO ROWS 

CONTROLL SETTING OF VOICE. ADSR. AMD 

OTHER PAREMITERS SUCH AS FELT MHtCH 
CONTROLLS THE DURATION OF THE NOTE OR THE 
BREAK FEATURE MHICH SIMULATES THE UP OR 
DOWNWARD SLIDE OF A NOTE. IT IS POSSIBLE 
TO PRODUCE A NOTE WHICH WILL MAKE THE 
PROGRAM APPEAR TO BE LOCKED UP 

COMPLETELY. THIS 18 EASILY ESCAPED FROM 
BY USING THE CANCEL KEY. THE CONDITION 
USUALLY OCCURS WHEN YOU SELECT A NOTE 
MHICH IS TOO LOU TO HEAR AND THE FELT 
STOP HAS BEEN SET TO 1 WHICH PRODUCES A 
LOW CONTINUOUS MOTE YOU CAN* T HEAR. TME 
KEYBOARD ACTION IS CLEAN AND SMOOTH THE 
NOTES ARE ACCURATE AND WITHOUT STATIC OR 
POP, 

THE PROGRAM DOCUMENTATION EXPLAINS 
THE OPERATION OF THE SYNTHESIZER QUITE 
WELL. HOWEVER A MEOPHYTE LIKE MYSELF. WHO 
HAS LITTLE MUSICAL EXPERIENCE. MILL NEED 
TO CAREFULLY READ THE BOOK AND POSSIBLY 
SOME OTHERS ALSO. BEFORE BECOMING 

COMPETENT IN USING IT. NOT HAVING BEEN 
EXPOSED TO SYNTHESIZER OPERATION BEFORE I 
FOUND MYSELF FREQUENTLY BEWILDERED BY THE 
TECHNICAL TERMS ENCOUNTERED IN THE 
MANUAL. 

THIS PROGRAM MILL BE A HIT WITH 
THE PEOPLE WHO ARE INTO ELECTRONIC MUSIC. 
IT IS A VERY EASY PROGRAM TO USE ONCE YOU 
UNDERSTAND HOM TO USE IT. ONCE FAMILIAR 
WITH THE STOPS AND KEYBOARD RANOE YOU 
WILL ENJOY CREATING YOUR OWN ORGAN OR 
"STAR WARS" TYPE MUSIC. DIVE IT A TRY AND 
YOU MILL SPEND MANY HOURS PLAVINO YOUR 
OWN KIND OF MUSIC. YOU MIGHT EVEN WRITE A 
NEW HIT TUNE . 



Joe Patrick 



Color Micro Journal 



SUPER 

Lunar Lander 

Requires 16K, EXT-BASIC, and Joystick 

"Lunar Lander" was one of the popular 
early Arcade Games at about the time 
that the Color Computer began to 
appear tn the Radio Shack Computer 
Centers. With the, at that time r 
unusual BASIC Graphic and Sound 
Commands provided by the Extended 
Basic ROM, it was a natural for the 
new Computer (and was one of the first 
Games available for it) . With an Aero- 
space Engineering Degree in my pocket, 
many hours of flying under my belt r and 
an interest in Science Fiction, it was 
"fore-told" that I would obtain the 
game for im/ new Computer. 

Probably due to my background, I was a 
little disappointed in the original 
game. It simply provided joystick 
control of the Lander to the landing 
site, a few "deadly" meteors that went 
straight across the Screen (if it 
moved, it was deadly), and the Lander 
ALWAYS started at the saore location. 
Besides, what better way to learn the 
Color Computers* "on board" language 
than to see what could be done to 
make Lunar Lander more realistic and 
challenging, 

I added the Opening, more stars in the 
background, more meteors (some 
deadly, some miss you), angular motion 
for tne meteors, gravity and orbital 
forces, the retracting 'Antenna* and 
'Landing Legs', and a random starting 
location and velocity for the Lander 
which allows the Player to save the 
Lander IF he/she is quick enough. The 
"Gravity Force" is balanced against 
the "Thrust Available" such that it 
takes almost FULL Thrust to set the 
Lander down safely (obviously, if you 
a re coming down too fast, you are NOT 
going to get it stopped in time - 
i.e., you have to plan ahead; WATCH 
OUT FOR THAT METEOR! «,* What's the fuel 
state? It wasn't like this in 
training.). The next project was to 
add horizontal scrolling with several 
different landing sites, and a visual 
representation of the amount and 
direction of the thrust being used. 
How about a "real time* fuel gauge? 
Scoring depending on time, fuel used, 
etc.? It seemed that a Machine 
Language Routine would be needed to 
handle the horizontal scrolling, so it 
became necessary to look into the 
Basic ROMs and the Instruction Set of 
the new CPU. One thing led to 
another, and I never got back to 
"SUPER Lunar Lander*. 

As it now stands, it is an interesting 
and challenging game. No attempt has 
been made to stream-line the program 
to make use of the idiosyncrasies of 
BASIC in general, or the Color 
Computer BASIC specifically (that is 
left up to you) . It is simple and easy 
to follow. The instructions for 
playing the game begin at Statement 
No. 2000. 
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The general sections of the Program 

are as follows: 

2 - 85 ■ the Opening 

90 - 270 ■ Logo and starting options 

280 - 350 = Initialization 

360 = Stars 

370 - 500 = Draw Mountains 

510 - 590 - "beep", draw Lander with 

or w/o Antenna or Legs 
600 - 716 - Meteors 
720 = calc. Horizontal Vel. 
730 -750 » chk fuel, do "free fall" 
7 56 - 790 * calc Vertical Vel, fuel 

used (depends on power applied} 
800 & 810 = if low fuel, "beep" 

warning 
840 & 850 * if "down", was it a "safe" 

landing (re. State. #1230) 
870 - 920 ■ chk if inside the galaxy 
925 - if below mountains, forget the 

meteors 
930 - 965 ■ 77 hit by a meteor 
970 - 1150 ■ ?? hit a mountain 
1160 - 1200 ■ "explosion" (size 

depends on how hard you hit) 
1210 - 1310 - "Mission Debriefing" 
2000 — > = Instructions and Starting 

Options 

Finally, to help in evaluating the 
Program, and as a GREAT aid in 
"customizing" it, I have also included 
a Cross-Reference of "SUPER Lunar 
Lander". 

Robert L, Nay 



2 PMODE 4,1: PCLS; SCREEN 1,1 

4 S=0i Sl-0 

6 FOR B^l TO 50: X=RND(255): Y-R 

ND(191) 

8 PSET(X,Y,1): NEXT 

10 FOR S«l TO 21 

12 A$-"S"+STR$ (S) 

14 B$="BM"+STRS (127-4*S) +" ,"+STR 

$ (93-2*S) 

16 C$="BM"+STR$(130-5*S)+","+5TR 

S (97+2*S) 

18 DRAW "XASfCljXB$;NU4R4 BR2BU1 

NU3F1R2E1NU3BD1 BR2U4F4NU4 BR2E4 

F3NL6F1 BR2U4R3F1G1L1NF2L2" 

20 DRAW "XCS;D4R4 BR2E4F3NL6F1 B 

R2U4F4NU4 BR2U4R3F1D2G1L3 BR7NR4 

U2NR2U2R4 BD4BR2U4R3F1G1L1NF2L2" 

22 FOR T=l TO INT ( 250 0/S): NEXT 

24 IF Sl=22 THEN 70 

26 NEXT S 

28 FOR Sl=l TO 22 

30 IF Sl=22 THEN 18 

32 A$="S"+STR$(S1) 

34 B$="BM"+STR$(l27-4*Sl)+","+ST 

R$(93-2*S1) 

36 C$="BM"+STRS(l30-5*Sl)+","+ST 

R$(97+2*S1) 

38 DRAW "XA$;C0;XB$j NU4R4 BR2BU 

1NU3F1R2E1NU3BD1 BR2U4F4NU4 BR2E 

4P3NL6F1 BR2U4R3F1G1LLNF2L2" 

40 DRAW "XC$;C0;D4R4 BR2E4F3NL6F 

1BR2U4F4NU4 BR2U4R3F1D2G1L3 BR7N 

R4U2NR2U2R4 BD4BR2U4R3F1G1L1NF2L 

2" 

42 FOR T»l TO INT(2500/S) :NEXT 

60 NEXT SI 

70 GOSUB80 

75 GOTO90 



i 
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POOR MAN'S 
FLOPPY 

HIGH SPEED CASSETTE SYSTEM 

Now for the TRS-80 Color Computer 

The JPC PRODUCTS High Speed Cassette System, n operation 
for over 4 years, is now available for all versions oi the Radio 
Shack® Color Computer 

• 7C-8C — Plugs directly into the expansion port of your 
TRS-80 Color Computer It is fully compatible with all 
versions of the Color Computer from the standard 4K to 
the Extended 32K, 

• j^ST — Twice the speed of the Color Computer System, 

• RELIABLE — Less than one error in a million bits. 

• SUPPORTS TWO DRIVES — Software selectable. 

• ALL FILE TYPES — BASIC, machine language, data. 

• MOTOR CONTROL — Two on -board relays. 

• EPROM OPERATING SYSTEM 

• SB\RE EPROM SOCKET — 2716 or 2732 compatible. 

• OPTIONAL JBUG MONITOR — EPROM or Cassette 

• 6809 Assembler * Memory modify and list 

• 6809 Dis-assembler • Break point traps 

• ASSEMBLED and TESTED 

TC-8C .....$ I 29.95 JBUG (EPROM) . . . $34.95 

JBUG (Cassette) .... $29.95 

TERMS: 

Cash, Master Card of Vrsa 

Shipping & Handling S3SQ(US) — r — _ pp- _^ 

S5.S0 (Canada} Si 5.00 ■ A %■ ^^^'^rNV^N^ " il 

Inqumn: Phone ^«lr ,oT * l^O^oflC-jjl 

SC0-6SCPMMST f \ \?^ f&\#SZ*.*" 
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80 PLAY"L4;V31;T2;03?1;T6;6;1;6; 

T2;11;T6j10;6;1;O2;T2;A|jO3|T6|O 

#;02yA#j03,-D#;T2jGI?T6;G;F;D|;O3 

;T2;6* 

85 RETURN 

90 CLS 

91 PRINTG10, -*************• 

92 PRINTS41, ** *" 
96 PRINT§72, "* -SUPER-* 






100 PRINT? 10 4 f 



»* 



101 PRINT§136 r "* LUNAR LANDER * 

102 PRINT§168, ****************** 

103 PRINTe202,"*":PRINT§214,"*" 

104 PRINTG233,"*"; PRINTS 247 ,"*• 

105 PRINTS 264*'* BY * 

■ 

110 PRINT* 295, •* ROBERT L NAY 

*■ 

115 PRINTS 326,"* 1981 

*■ 

120 PRINT#419, "FOR INSTRUCTIONS 

pcjpcc i ji" 

125 PRINT? 449, "ELSE PRESS RIGHT 
'FIRE' BUTTON" 

130 PRINT#490,"TO START GAME"; 
135 GOTO240 
210 GOTO220 

215 PRINTH48," TO START 

AGAIN" 

220 PRINT§416, ■ PRESS RIGHT ■ 
FIRE' BUTTON" 
240 W=PEEK (65280) 
250 IFW126THEN280 
260 IFW=254THEN280 
265 IF INKEYS="I"THEN2000 
270 GOTO240 
280 X=J0+RND(185):Y»30+RND(50) 

290 B»RND(140):D»RND(140):F=RND( 
140);H=*RND(140) 

291 81»RND{120):F1=RND(120) 

292 D1=RND(120):H1=RND(120) 

300 1=RND(10);J*RND(10):K=RND(10 
) :L=RND[10)tS=4500 

301 IX=RND(12):IY«RND(10)-4:JX=R 
ND(10):JY=RND(12)-5 

302 KX=RND(12);KY*RND(10)-4iLX=R 
ND( 16 ) I LY-RND ( 1 4) -7 

310 N*0:V=0:A»0:O0:E=255:G*255: 

0=90: P»32: 0=0 

311 A1=0:E1=255:C1-0:G1=255 

312 AA=6; AM=6: LG-0 

314 C$-"NH"+STRS (AA) +"NU"+STR$ (A 

M)+"NE"+STR$(AA) 

316 D$--NG"+STR$(LG): E$="NF H +ST 

R$(LG) 

320 T=RND(8)-4:U-RND(8)-4 

330 PMODE4,l 

340 PCLS 

350 SCREEN1,1 

360 F0RM=1T025:PSET(RND{255),RND 

(140)):NEXTM 

370 LINE (0,191) -(45, 146), PSET 

380 LINE- (53,1 54) f PSET 

390 LINE-(67,141),PSET 

400 LINE-(90,161),PSET 

410 LlNE-(105 f 146),PSBT 

420 LINE-(165,191),PSET 

430 LINE(200,191)-(240,161),PSET 

440 LINE- (255, 141) r PSET 

450 DRAW"S4" 

460 DRAW"BM53,154;F5R5F14" 

470 DRAW"BM90,161;G30" 

480 DRAW"BM105,146?D4F20G10L3G10 

■ 

490 DRAW"BM67,141}D10F6" 

500 DRAW"BM240,161;F10G10" 

510 X=OC+N:Y»Y+V 

515 SOUNDY,l 

520 IFX>255THENX=255 

530 lFX<0THENX-0 

540 IFY>191THENY=191 

550 IFY<0THENY=0 

560 A$-"BM"+STR${X)+","+STR$(Y) 
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570 DRAW"S2|C0jL7H5U2E5R5yXC$?R5 

F 5D2G5L1 3D3R3 ; XD$ ; Rl 5 ? XE$ j R3U 3L8 

■ 

572 IF Y>155 THEN RT-0 

574 IF YC140 THEN RT=6 

576 AA=RTi AM=RT: LG^ABS(RT-6) 

580 DRAW A$ 

583 C$="NH"+STR$ (AA) +"NU"+STR$ (A 

M)+"NE"+STR$(AA) 

586 D$="NG"+STR$(LG); E$-"NF"+ST 

R$(LG) 

590 DRAW"S2?Cl;L7H5U2E5R5;XC$yR5 

F5D2G5L13D3R3;XD$;R15;XE$;R3U3L8 

600 P5ET(A,B,0):A=A+I:IFA<255THE 

N620 

610 B=RND(140):I=RND(8):A-0 

620 PSET(A,B,1) 

622 PSET(Al,Bl,0):Al^Al+IXsBl-Bl 
+IY: IFA1->255THEN625 

623 IFBK0THEN625 

624 IFBK160THEN626 

625 B1-RND(140):IX=»RND(12):IY=RN 
D(10)-4:A1=0 

626 PSET(A1,B1,1> 

630 PSET(C,D f 0):C=C+J:lFC<255THE 

N650 

640 D=RND(140):J=RND(8}:C-0 

650 P5ET(G,D,1) 

652 PSET(C1,D1,0):C1=C1+JX:D1-D1 
+JY: IFC1->255THEN655 

653 IF DK0THEN655 

654 IFDK160THEN656 

655 D1=RND(140):JX=RND(12):JY-RN 
D[10)-4:C1«0 

656 PSET(C1,D1,1) 

660 PSET(E,F,0):E=*E-K:IFE>0THEN6 

80 

670 F=RND(140):K=RND(8>:E»255 

680 PSET(E,F,1) 

682 PSET(E1,F1,0):E1=E1-KX:F1=F1 

+KY: IFEK0THEN685 

684 IFFK160THEN686 

685 Fl=RMD(l40)jKX-RND(12):KY-RN 
D(13)-5;El-255 

686 PSET(E1,F1,1) 

690 PSET(G,H,0):G*G~LtIFG>0THEN7 

10 

700 H=RND(140):L=RND(8):G-255 

710 PSET£G,H,1) 

712 PSET(Gl,Hl f 0):GlK31-LX:Hl«Hl 
+LY:IFGK0THEN715 

713 IFHK0THEN715 

714 IFHK160THEN716 

715 Hl=RND(140):LX*RND(12):LY=RN 
D(12)-5:G1=255 

716 PSET(G1,H1,1) 

720 T=T+(JOYSTK(0)-P)/O;N=INT{T) 

730 IFS>0THEN756 

740 U-U+2:V=INT(U) 

750 GOTO840 

756 U=»U+(Y-64)/512 

760 U=U+(JQYSTK(1)-P)/0:V=INT(U) 

770 S*S-ABS((JOYSTK(l)-64)/2) 

780 S-S-ABS(JQYSTK(0)-32) 

790 IFS<0THENS=0 

800 IFS>1000THEN840 

810 PLAY"V31,-T255;L255;05jCB" 

840 IFY<186THEN870 

850 1FU>1.5THENQ<L:GOTO1160 

860 GOTO1200 

870 IFY>6THEN890 

880 O*3iGOTOll60 

890 IFX<249THEN910 

900 Q=3:GOTO1160 

910 IFX>8THEN925 

920 O=3:GGTO1160 

925 IFY>140 THEN 970 

930 IFINT(ABS(X-A) +ABS(Y-B) ) <8TH 

ENO-2:GOTO1160 

940 IFINT(ABS(X-C)+ABS(Y-D))<8TH 

ENQ=2;GOTO1160 

950 IFINT (ABS ( X-E) +ABS (Y-F) ) <8TH 

ENO=2:GOTO1160 

960 IFINT(ABS(X-G) +ABS (Y-H) ) <8TH 



ENQ=2:GOTO1160 

965 GOTO510 

970 IFX>45THEN990 

980 Yl-INT(181-(l*(X)+0))tGOTOll 

40 

990 IFX>53THEN1010 

1000 Yl=INT(l81-(-l*(X)+90)):GOT 

01140 

1010 IFX>67THEN1030 

1020 Y1=INT(181-(.93*(X)-12.214) 

)jGOTO1140 

1030 IFX>90THEN1050 

1040 Yl=INT(181-(-.87*(X)+108.3) 

)jGOTO1140 

1050 IFX>105THEN1070 

1060 Y1-INT(181-(1*(X)-60)):GQTO 

1140 

1070 IFX>165THEN1090 

1080 Yl=INT(181-(-.75*(X) +123.75 

)):GOTO1140 

1090 IFX>200THEN1110 

1100 GGTO510 

1110 IFJO240THEN1130 

1120 Yl=INT(181-(.75*(X)-150)):G 

OTO1140 

1130 Yl=INT(181-(1.33*(X)-290)) 

1140 IFY>Y1 THEN Qj-4:GOTO1160 

1150 GGTO510 

1160 FORR=lT04*(ABS(U)+6) 

1170 CIRCLE ( X,Y),R, 5 :NEXTR 

1180 FORR-4*(ABS(U)+6}T01 STEP-1 

1190 CIRCLE(X,Y),R,0:NEXTR 

1194 FORXX=1T02 

1 195 PLAY*T255 ; L255 ;01CDEFGABAGF 
EDC j 02 ; CDEFGABAGFEDC ; 03? CDEFGABA 
GFEDC;04 ; CDEFGABAGFEDC ; 05; CDEFGA 
BAGFEDC" 

1196 NEXTXX 

1200 FORM=1TO500:NEXTM 

1210 CLS: PCLS 

1220 IFQO0THEN1230 

1222 PRINT: PRINT" *CONGRATULATI0 

NR, YOU MAPE IT* " 

1224 GOSUB80 

1226 GOTO1270 

1230 IFQ-1THENPRINT"Y0U CRASHED, 

TOUCHDOWN TOO HARD" :G0T01 270 
1240 IFQ*2THENPRINT"YQU WERE HIT 

BY A METEOR" :G0T01 270 
1250 IFQ=3THENPRINT"Y0U HIT THE 
EDGE OF THE GALAXY":GOTO1270 
1260 PRINT" YOU CRASHED ON THE MO 
UNTAINS" 
1270 PRINT:PRINT:PRI»fr"FLIGHT ST 

ATISTICS I " 

1280 PRINT" FUEL REMAINING :";S 
1290 PRINT" VERT. VELOCITY :"?- 
U 

1300 PRINT* HOR. VELOCITY :"?T 
1310 GOT0215 
2000 CLS 

2010 PRINT" YOU ARE THE PILOT OF 
THE LUNAR" 

2020 PRINT" LANDER," J PRINT 
2030 PRINT" YOU CONTROL THE CRAFT 
BY USING" 

2040 PRINT" THE RIGHT JOYSTICK," 
: PRINT 

2050 PRINT"THE OBJECT OF THE GAM 
E IS TO" 

2060 PRINT" LAND THE CRAFT ON LE 
VEL GROUND" 

2070 PRINT" AT A VERTICAL SPEED 
OF LESS" 

2080 PRINT* THAN -1.5 FEET PER S 
ECOND.": PRINT 

2090 PRINT" (ANY KEY TO CONTINUE) 

■ 

2100 IF INKEY$=""THEN2100 
2110 CLS 

2120 PRINTHCWEVER, IT IS NOT VE 
RY EASY.": PRINT 

2130 PRINT"IN OUTER SPACE, THERE 
ARE" 

2140 PRINT" RANDOM METEORS THAT 
WILL" 
2145 PRINT" EXPLODE YOUR CRAFT I 
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CoCo HEADQUARTERS 

Looking to unlock the capacity of your Color Computer? 

Search no more — 



TOLL FREE 
1-800-251-5008 




SPECIALS 




Extended Basic $ 89.00 

32/64k Upgrade $ 69.00 

16k Upgrade $ 25.00 

R/S Disk Controller $189.00 

1.1 Basic ROM $ 27.00 

Amdek Disk Drives $ Call! 



Super Pro Keyboard Kit 
26-3004 Color Computer 16k 
26-3002 Extended 16k CoCo 
26-3003 32k Extended CoCo 
26-3003(4) 32/64k Ext- CoCo 
26-1192 CGP-115 Printer 
ACCESSORIES 



$ 
$ 

$ 
$ 
$ 
$ 



69.95 

179.00 
269.00 
379.00 
349.00 

179.00 



Hayes SM1200 Modem $ 599.00 

USR AL212 (300/1200) S 495.00 

Hayes SM 300 Modem $ 239.00 

R/S D.C. Modem 2 $ 2 15.00 

USR AL300 $ 199.00 

R/S D.C. Modem 1 5 129.00 

Hayes/USR Cable $ 19.00 

26-3020 Cable $ 5.25 



2 6-1206 CCR-81 
26-3008 Joystick 
Kraft Joystick 

Wico Track Ball 
W i co Joy st ick 
Wico Adapter 
Verbatim Disks 
Elephant Disks 



$ 

$ 

$ 

$ 
$ 

$ 

s 
$ 



32 
22 

49 

59 
29 

19 

27 

25 



00 

00 

95 

95 
00 

95 

95 

00 



SOFTWARE 



Telewriter 64 $ 59.95(Disk) Space Shuttle $28.95 (Cass) 

Telewriter 64 $49.95(Cass) Colorpede $29.95 (Cass) 

Zaxxon by Sega $34.95(C or D) Mark Data Adven t ur e s $ 2 4 . 95 (Cass) 

The King by Tom Mix $ 26 . 95 ( Cass ) Ghost Gobbler $19.95 (Cass) 

The Frog by Tom Mix $ 2 7 . 9 5 ( Cas s ) MSI DATABASE $39.95 (Disk) 

Trapfall by Tom Mix $ 27.95(Cass) MSI Color Finance $59.95 (Disk) 

The Bar Zapper $ 15.95(Cass) The Graph Zapper $15,95 (Cass) 

ft*** A11 xns-80 Software 13% off list ***** 

Others include - Spectral Associates, Anteco, Prickly Pear, 
Mark Data, Tom Mix, Botek Instruments, Intracolor Communications 

Sugar Software, Cognitec, 
and many more! 



TOLL FREE 
TENNESSEE 

1-800-545-2502 

All of the above units covered by our 120 
day carry in warranty, (d) denotes "Delker" 
(20On5) memory guaranteed for 1 year. 
TRS-flO Trademark Tandy Corporation 
Prices subject to change without notice. 

Write for our FREE newsletter! 




TOLL FREE 
1-800-2515008 

(DEALER INQUIRIES WELCOME) 

DELKER ELECTRONICS, INC 

P.O. BOX 897 

DEPT D 

SMYRNA, TN 37167 

800-251 5008 

615-459-2636 (TENNESSEE) 
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-I* 



1* 



F YOU" 

2147 PRINT* GET TOO CLOSE. "ffRJN 

T 

2160 PRIKT"THE METEORS ARE THE M 

OVING* 

2170 PRINT" POINTS OF LIGHT. THE 

STARS" 
2180 PRINT* ARE THE STATIONARY P 
OIMTS OF" 

2190 PRINT* OF LIGHT AND ARE HAR 
MLESS.": PRINT 

2200 PRINT" (ANY KEY TO CONTINUE) 
n 

2210 IF INKEYS=* ,, THEN2210 

2220 CLS 

2230 PRINT" AND TO MAKE THINGS WO 

RSB," 

2240 PRINT" YOU HAVE A LIMITED A 

MOUNT" 

2250 PRINT" OF FUEL TO LAND WITH 

.•sPRINT 

2260 PRINT"WHEN YOUR FUEL GETS L 

OW A™ 

2270 PRINT" 'LOW FUEL* ALARM WIL 

L SOUND" 

2280 PRINT TO INFORM YOU OF THE 

IMPENDING" 
2290 PRINT" EWNGER. " J PRINT 
2300 PRINT-WHEN THE ALARM STOPS, 

YOU ARE" 
2310 PRINT" OUT OF FUEL, AND THE 

REST WILL" 
2320 PRINT" BE HISTORY. ": PRINT 
2330 PRINT (ANY KEY TO CONTINUE) 
* 

2340 IF INKEYS=""THEN2340 

2350 CLS 

2360 PRINT FINALLY, DO NOT ATTEM 

P TO LAND" 

2370 PRINT" ON THE MOUNTAINS." J P 

HINT 

2380 PRINTYOUR ENGINES ARE NOT 

•TIP'" 

2390 PRINT PROOF SO ANY ATTEMP 
TO DO" 

2400 PRINT SO WILL RESULT IN AN 
EXPLOSION . ■ I PRINT 
2410 PRINTPRESS ANY KEY TO STAR 
T THE" 

2420 PRINT GAME, AND GOOD LUCK. 
■ 

2430 IF INKEYS-""THEN2430 
2440 GOTO280 



■SUPER Lunar Lander" Cross-Reterence 



A 


310 600 610 620 


930 




A$ 


12 32 560 580 






Al 


311 622 625 626 






AA 


312 314 576 583 






AM 


312 314 576 583 






B 


6 290 600 610 620 930 


B$ 


14 34 




' 


Bl 


291 622 623 624 625 


626 


C 


310 630 640 650 


940 




C$ 


16 36 314 583 






CI 


311 652 655 656 






D- 


290 630 640 650 


940 




D$ 


316 586 






Dl 


292 652 653 654 


655 


656 


S 


310 660 670 680 


950 




E$ 


316 586 






El 


311 682 685 686 






F 


290 660 670 680 


950 




Fl 


291 682 683 684 


685 


686 


G 


310 690 700 710 


960 




Gl 


311 712 715 716 






H 


290 690 700 710 


960 




HI 


292 712 713 714 


715 


716 


I 


300 600 610 






IX 


301 622 625 






IY 


301 622 625 






J 


300 630 640 






JX 


301 652 655 







JY 301 652 655 

K 300 660 670 

KX 302 682 685 

KY 302 682 685 

L 300 690 700 

LG 312 316 576 586 

LX 302 712 715 

LY 302 712 715 

M 36C 1200 

N 310 510 720 

O 310 720 760 

P 310 720 760 

Q 310 850 880 900 920 930 940 950 

960 1140 1220 1230 1240 1250 
R 1160 1170 11B0 1190 
RT 572 574 576 
S 4 10 12 14 16 22 26 42 90 300 730 

770 780 790 800 1210 1280 2000 

2110 2220 2350 
SI 4 24 28 30 32 34 36 60 
T 22 42 320 720 1300 
U 320 740 756 760 850 1160 1180 

1290 

V 310 510 740 760 
W 240 250 260 

X 6 8 280 510 520 530 560 890 910 
930 940 950 960 970 980 990 1000 
1010 1020 1030 1040 1050 1060 
1070 1080 1090 1110 1120 1130 
1170 1190 

XX 1194 1196 

Y 6 8 280 510 540 550 560 572 574 
756 840 870 925 930 940 950 960 
1140 1170 1190 

YS 265 2100 2210 2340 2430 
Yl 980 1000 1020 1040 1060 1080 1120 
1130 1140 

18 CALLED BY 30 

70 CALLED BY 24 

80 CALLED BY 70 1224 

90 CALLED BY 75 

215 CALLED BY 1310 

220 CALLED BY 210 

240 rAIXRH RV 135 770 

280 CALLED BY 250 260 2440 

510 CALLED BY 965 1100 1150 

620 CALLED BY 600 

625 CALLED BY 622 623 

626 CALLED BY 624 
650 CALLED BY 630 

655 CALLED BY 652 653 

656 CALLED BY 654 
680 CALLED BY 660 

685 CALLED BY 682 683 

686 CALLED BY 684 
710 CALLED BY 690 

715 CALLED BY 712 713 

716 CALLED BY 714 
756 CALLED BY 730 
840 CALLED BY 750 800 
870 CALLED BY 840 
890 CALLED BY 870 
910 CALLED BY 890 
925 CALLED BY 910 
970 CALLED BY 925 
990 CALLED BY 970 
1010 CALLED BY 990 
1030 CALLED BY 1010 
1050 CALLED BY 1030 
1070 CALLED BY 1050 
1090 CALLED BY 1070 
1110 CALLED BY 1090 
1130 CALLED BY 1110 

1140 CALLED BY 980 1000 1020 1040 
1060 1080 1120 

1160 CALLED BY 850 880 900 920 930 
940 950 960 1140 

1200 CALLED BY 860 

1230 CALLED BY 1220 

1270 CALLED BY 1226 1230 1240 1250 

2000 CALLED BY 265 

2100 CALLED BY 2100 

2210 CALLED BY 2210 

2340 CALLED BY 2340 

2430 CALLED BY 2430 



The Clear Winner 

A 




The Original FLEX from Data-Comp 
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COLOR MICRO JOURMAL I* actively soliciting. 
contributions for publication. We ore looking 
for AMY type of material that will be useful to a 
Color Computer Owner; from hints to full Programs 
and Construction Articles. We will pay for 
submissions based on a number of criteria* If 
you wish payment for a contribution, be sure to 
state these requirements with your submission. 
ALL submissions must contain a statement that 
the material Is not currently under 
consideration by another publication. Porjnore 
detailed Information, send a SASE .to the Editor, 
COLOR MICRO JOURNAL. P*0- Box 344, Htwxvv T* 
37343. 

Articles submitted for publication should be 
accompanied by the authors Felt Name, Address,, 
Date, and Telephone Number. It Is preferred 
that articles be submitted as a -TXT File on a 
FLEX Formatted 5 or B Inch Disk, tr as an ASCII 
File on a Radio Shack Disk or Tape to /DAT Flla). 
BASIC Programs should be submitted on Disk or 
Tape In the normal Binary Format. 

It articles are submitted on paper, they should 
be either Typed or Printed Single Spaced with a 
MAXIMUM Line Length of *■ on normal 8 1/2" x 11" 
bond or better paper. A good BLACK Ribbon must 
be used because all paper submitted articles MM 
be photo reproduced. MO hand written artldm 
will be accepted {except required art work which 
goes ulth an article). Again, PLEASE use a DARK 
Ribbon. 

All letters to the editor should also comply with 
the above amd MUST beer a signature. Letters of 
•gripes" ti wall as 'praise* are solicited. »a 
attempt to publish all letters to the editor 
verbatim; however, we reserve the right to 
reject any submission for lack of "good taste . 
We also reserve the right to define what 
constitutes "good taste'. 

Advertising: Commercial advertisers please 
contact the COLOR MICRO JOURNAL advertising 
department for current Rate Sheet and 
Requirements. 

TRS-80C, Color Basic. Extended Color Basic, and 
Disk Color Basic are trademarks of the Tandy 
Cora. FLEX and UnlFLEX Br« trademarks of 
Technical Systems Consultants, Inc* OS-9 and 
BASIC09 are trademarks of MTcroware Systems 
Corp. UNIX is a trademark of Bell Laboratories. 
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You have HEARD about FLEX(tm); now LEARN about FLEX, 
Subscribe to the '68 - Micro Journal! 

You have HEARD about the power of the 6809 Computer Chip 

in your Color Computer? now LEARN how to use this power. 

Subscribe to the W Micro Journal! 

You have HEARD about the "Multi-User, Multi-Tasking" UNIX(tm) style 
Operating Systems (such as 0S-9(tm) and UhiFLEX(tm)); now LEARN about them. 

Subscribe to the *6&* Micro Journal! 

Your have HEARD about all the Software available for the 68xx Series Based 
Computer Systems; now LEARN about this Software AND the Computer Systems. 

Subscribe to the *G8* Micro Journal! 



■68" Micro Journal provides INFORMATION thru: 
Regular MONTHLY Columns like "FLEX Users Notes" by Ron Anderson, "OS-9 Users 

Notes" by Peter Dibble, "C Users Notes" by Norm Commo, "Color Users Notes" 

by Bob Nay, etc. 
Regular MONTHLY Features like the "Bit Bucket", Reviews, Articles, Programs, 

etc., covering Software Development, Business Use, Operating System 

operation, hints, etc. 



DON'T MISS A SINGLE ISSUE; SUBSCRIBE NOW ! 

OK, PLEASE ENTER MY SUBSCRIPTION 
Bill My: Master Charge 3 — VISA (~| 

Card # -•■■, _ Exp. Date 

For □ 1-Year □ 2 Years Q 3 Years 



SUBSCRIPTION RATES 
USA 



1 Year $24.50, 2 Year $42.50, 3 Year $64,50 
•FOREIGN SURFACE Add $12*00 per Year to USA Price 
•FOREIGN AIRMAIL Add $36*00 per Year to USA Price 



••CANADA & MEXICO Add $5.50 per Year to USA Price 
Cash (USA) or drawn on a USA Bank!!! 
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^ 



Enclosed: $. 



Name. 



Streets 



City- 



State 



-Zip 



My Computer Is:. 



681 Micro Journal 

5900 Caaaandra Smith Rd. 

Htxaon, TN 37343 
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GIMIX 2MHZ 6809 SYSTEMS CAN BE CONFIGURED TO RUN: 
FLEX • OS-9 LEVEL ONE • UNIFLEX • OS-9 LEVEL TWO 

SINGLE USER SYSTEMS with 56KB of static RAM 

MULTI USER SYSTEMS with 128-51 2KB off static RAM and up 

YOUR GIMIX SYSTEM CAN GROW WITH YOUR NEEDS 



CHOOSE FROM GIMIX SVa" OR 8" FLOPPY DISK DRIVE 
SYSTEMS AND WINCHESTER DRIVE SYSTEMS 



o» 



^ 1337 WEST 37th PLACE 

Si Wt'il.'SL mm* * m m CH,CA ^ ' SiKSS 60609 

FLU and UniflEX ate trademarks of Technical Systems Consultants Inc. (312) 927-5510 

OS-9 is a trademark of Microware SjHtems Coc p. TWX 91 0-221 -4055 
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